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СНАРТЕН 1 


PROGRAMMING IN BASIC 


BASIC is only one of the many languages used to communicate with 
computers. It is however, the most common language in the 
microcomputer world, so it's a good one to know. BASIC varies from 
computer to computer, but once one dialect is known it is easy to adapt to 
others. A knowledge of Commodore 64 BASIC is a solid basis for 
programming in BASIC on any computer. 


COMMODORE 64 BASIC 
immediate and Program modes. 


When the Commodore 64 is turned on it starts in immediate mode. In this 
mode, each line typed in and completed by pressing RETURN is 
executed immediately — hence the name. 
Program mode is used to store programs. The name is something of a 
misnomer, but it is commonly used. Actually, you're still in immediate 
mode, but whenever BASIC sees a line that starts with a number, it 
executes the line by storing it in memory. The statements following the 
line number are executed only when you run the program. 
e.g. typing PRINT "HELLO" will cause HELLO to be displayed on the 
screen. 
typing 10 PRINT "HELLO" will cause that line to be stored in 
memory. There will be no display until you type RUN. 

Points to note: 
e Line numbers must be integers from O to 63999. 
e Lines are sorted into numerical order no matter in what order they're 
typed. 
e Typing а line number, then pressing RETURN deletes that line. 
е Typing two lines with the same line number leaves only the second line 
in the program. 
е Typing NEW deletes all program lines in memory so that you can type 
in a new program. If you don't do this the new program may have lines 
from the old program in it. 
e To BASIC, a line can be up to 80 characters long (including the 
RETURN to terminate it) — ie. 2 screen rows. If you continue typing after 
this, none of the line will be stored in the program (if in program mode) or 
executed (if in immediate mode). 
e You may put more than one statement on a line by seperating them 
with a colon. 
e.g. PRINT “H” : PRINT "E" : PRINT "L" : PRINT "L" : PRINT "О" 
This can be done in both program and immediate modes. 


e It is а good idea to start numbering lines at 100, and increasing at 
intervals of 10 or 20. This enables you to insert lines between existing 
lines. 

e Although the BASIC interpreter stores any spaces you put in program 
lines, it ignores them when it executes. All spaces may therefore be 
omitted, although this makes programs difficult to read. The spaces are 
Stored and when you list the program they are included in the listing. You 
cannot insert any spaces into keywords. 

Control Structures 

These are statements which control the order in which program lines are 
executed. BASIC has the simplest contro! structure — sequential 
execution — built in. In the absence of any other contro! structure, a 
program is executed from the lowest to the highest numbered line. If this 
were the only control structure available, programs would be very limited, 
so Commodore 64 BASIC has the following statements for program 
control. They allow your programs to make decisions, perform loops, and 
branch to different parts of the program. 


IF — THEN 


IF [expression] THEN [statement(s)] 
e.g. 10IF A=5 THEN В=А-1 : СОТО 200 
20IF(A > OANDA < —S3) THEN GOSUB 6000 
If the expression is true then all statements following the THEN are 
executed. In line 10 above, for example, if A=5 then both statements 
В-А-1 and СОТО 200 are executed. If the expression is false, both 
Statements are ignored, and the next line is executed. 
The expression may be arithmetic, in which case the THEN statements 
are executed if the expression evaluates to any number other than O. In 
other words, the Commodore 64 takes 0 to be FALSE and all else to be 
TRUE. This isn't particularly useful, and is bad programming style, since 
it isn’t immediately obvious what is meant. 
e.g. 1Е 5+6 ТНЕМРАІМ№Т "YES" 
result — prints YES 
IF A-5 THEN PRINT "YES" 
result — doesn't print if A=5 

If the expression evaluates to a string the result is unpredictable. 
FOR — NEXT 

FOR [variable] = [start] TO [limit] STEP [step] 

[statement(s)] 

NEXT [variable] 
e.g. 

10 FOR J=62 TO 70 STEP 1 

20 PRINT CHR$ (J) ; "IS ASCII” ; J 

30 NEXT J 


This loops through lines 10-30 in the following way. 
(i) Jis setto the start value - 62 
(ii) statements are executed until a NEXT statement appears 
(іі) the STEP factor is added to J. J = 63 
(iv) Jis compared to the limit value - 70. If J is greater than 70 the loop is 
finished and execution proceeds from the line following the NEXT 
statement. If J is less than or equal to 70 the program loops back to line 
20. If line 10 had been FOR J=70 TO 62 STEP —1 the values of J would 
be decremented by 1 every pass through the loop. When J is compared 
to the limit value 62 execution of the loop continues if J is greater than or 
equal to the limit value. Execution does not proceed to the line following 
the next statement until J is less than 62. 
е The FOR variable must be a floating point variable 
e [start], [limit] and [step] may be numeric variable names, expressions, 
negative, positive, integer or floating point. 
e "STEP [step]" may be left out, in which case a STEP value of 1 is 
assumed. So in the example above "STEP 1" is not necessary. 
e The variable name in the NEXT statement may be left out. In the 
example above, line 30 may read "30 NEXT" 
e FOR loops are always executed at least once, even if the start value is 
initially greater than the limit for positive steps or less than the limit value 
for negative steps. This is because the comparison of the FOR variable 
with the limit is done at the end of the loop. 
e |f the step value is negative, the loop is terminated when the FOR 
variable is less than the limit. Again, the loop will be executed at least 
once. 
e FOR statements may be nested to a maximum depth of 10. That is, 
you may have loops within loops. 
e.g. : 

10 FOR /=1ТО 5 

20 FORK-1TO7 


30... 

40 FOR L=1 TO3 

50... 

60... 

70 NEXT L 

80 NEXT K 

90 NEXT J 
When nesting loops be careful to terminate them correctly. The last FOR 
variable mentioned must be the first NEXT variable mentioned. If the 
variable names are left out of the NEXT statements, BASIC terminates 
the loops correctly. Each loop variable is placed on a stack. The NEXT 
statement takes the variable from the top. This is always the last one 
placed there. Hence the computer's "ability" to select the correct NEXT 
variable. 


e There may be more than one variable name in a NEXT statement. The 
example above could have been terminated by 70 NEXT L,K,J. If you 
leave the variable names out BASIC will only terminate the last loop for 
you — ie. “70 NEXT” is only equivalent to "70 NEXT L”. 
GOTO 
GOTO [line— number] 
This is the simplest of the control statements. When executed, it causes 
the program to continue from the line number named. The unrestrained 
use of GOTOs can make programs difficult to follow, so it should be used 
with care. 
% The line number must exist in the program. 
е Itcannot be a variable name or an arithmetic expression. 
e.g. 10Х-50 

20 GOTO X - incorrect 

20 GOTO ( 40+30 ) – incorrect 

20 GOTO 200/10 - will goto line 200 

20 СОТО 200 — correct if line 200 exists 
GOSUB 
GOSUB [line - number] / RETURN 
GOSUB is short for GO to SUBroutine. A subroutine is a collection of 
Statements terminated by a RETURN statement. 
When a GOSUB is executed, the program continues from the line 
number named, just like a GOTO. But, when the next RETURN 
Statement is reached, the program returns to wherever the GOSUB is, 
continuing execution from the statement following the GOSUB. 


60. 10 Мерења но 
20 GOSUB500 — >50  .............. 
80». А алық $510 — — .............. 
dÜ^ _.............. $ 520 RETURN 


The arrows indicate the path the program follows. 

Subroutines are useful when there is a task which must be executed 
several times in the program. Using subroutines means you needn't write 
the same lines several times — you just GOSUB to them each time you 
need them. 

* ARETURN statement without a GOSUB causes an error 

• A RETURN statement is not written by pressing the RETURN key! 
They are quite different. 

• There may be multiple RETURN statements in a subroutine. 


e.g. 10 GOSUB 500 


500 IF Х=5 THEN RETURN 

510 IF X26 THEN B=X : RETURN 
520 C=X 

530 RETURN 


This saves you having to jump to the end of the subroutine to a single 
RETURN 
e Subroutines may be nested. 
e.g. 10 GOSUB 520 
520... 
530 GOSUB 600 


540 ... 
550 RETURN 


600... 

610 GOSUB 700 
620 ... 

630 RETURN 


BASIC does this by "stacking" the return addresses. When a GOSUB is 
reached, its address is put on a stack. At the next GOSUB its address is 
put on top of the first, and so on. When a RETURN is reached, the 
address on top of the stack is taken off, and the program branches to that 
address. At the next RETURN the address next on the stack is taken off, 
and so on. The addresses are stored in a special area called "stack", 
which is a fixed size (256 bytes) Therefore, by nesting too many 
GOSUBS you can run out of stack space. This will cause an "OUT OF 
MEMORY” error message to be displayed. 

ON GOTO/GOSUB 

e) ON [variable] GOTO [line— number 1], [line —number 2] .... 

ON [variable] GOSUB [line — number 1] , [line number 2] .... 
Depending on the value of the variable, the program will GOTO (or 
GOSUB) one of the line numbers. If the variable equals 1, the program 
will GOTO the first line number, if the variable equals 2, it will GOTO the 
second line number, and so on. 

e.g. ONXGOTO 200,60, 60, 75, 500 
e |f the variable is 0 or greater than the number of line — numbers, the 
statement is ignored, and execution continues from the statement 
following the ON statement. If the variable is negative, it causes an error. 
If it is non-integer the fractional part is ignored and only the integer part is 
used. 
e The variable may also be an arithmetic expression. 
e.g. ON(A*3 + 4) GOSUB 100, 1200, 60 

ON (X-3*Y) GOTO 60, 60, 70, 80, 900 


END 


This statements stops the execution of a program. There may be several 
END statements in a program. This is handy for debugging (ie. getting rid 
of errors), since after an END has stopped the program, you may check 
the value of variables (by typing PRINT [variable] ), change the value of 
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variables, or look at the program listing (by typing LIST). You may then 
continue the program by typing CONT. However, CONT won't work if the 
program stopped on an error, or if you attempt to edit the program. 

e |tis not necessary to finish a program with an END statement. 


DATA STRUCTURES 

For a program to be useful it must be able to store information. It does this 
by using data structures. The following is a brief summary of the data 
structures available on the Commodore 64. 


Bits and Bytes 

A bit is the basic data structure used in all digital computers. The name is 
derived from Binary digIT, because a bit can take one of only two values, 
1 or 0. Since it would be extremely cumbersome to store information bit 
by bit, there are more sophisticated data structures available to the 
programmer. 

A byte is 8 bits. It can represent any number from 0 to 255 using the 
binary number system. The Commodore 64 is a byte addressable 
machine, which means that a byte is the smallest data structure which 
the programmer can directly examine or change — using PEEK and 
POKE. 

(For more on bits, bytes and the binary number system see the section 
on Operators.) 


Characters 
Characters are stored as a code number in 1 byte. Thus there are 
potentially 256 character codes. The most common code is ASCII (for 
American Standard Code for Information Interchange). The Commodore 
64 however, uses a slightly different code so as to cover colours and 
other special characters. Appendix A contains a table of ASCII and 
Commodore 64 character codes. You may also use CHR$ and ASC to 
explore Commodore 64 character codes. 
e.g. PRINT CHR$ (65) will print the character with code 65 — an "A" 
PRINT ASC ("B") will print the code for "B" — 66 
* There is a difference between numeric characters and numbers. A 
number is read as a character when it appears between double quotes 
e.g. "5" — the character 5 
5 — the number 5 
PRINT ASC ("5") will display the code for the character 5 
PRINT ASC (5) won't work. 


Variables 

In general, when you store information you don't want to: 
— decide where in memory to put it 

— POKE it byte by byte into memory 


— remember where you put it so you can retrieve it. 

BASIC provides variables to do this for you. All you have to do is provide 
a name for your information. BASIC then attends to storage and retrieval 
of that information. 


Rules for naming variables. 


1) The first character must be a letter : A-Z, a-z 
2) Exceptfor the last character, the rest must be letters or numbers. 
3) Thelast character must be - 
— “$” if you're storing strings 
— "96" if you're storing integers 
— aletter or a number if you're storing floating point numbers 
e.g. AB$, NAMES — string variables 
КІ%, SKILL% — integer variables 
E2, TEMP — floating point variables 
e Variable names can be any length. 
e However, BASIC only recognises the first two characters plus the last 
one, if it’s either "96" or “$”. 
e.g. NAMES is seen as МА% 
NATURES is also seen as МА% 
TEMP is seen as TE 
SKILL% is seen as SK% 
So don't use names like TEMP1 and TEMP2, since BASIC will treat them 
as one variable. Make sure different variable names differ in the first or 
second character. 
e The advantage of long variable names is that they make programs 
easier to understand. 
The disadvantage is that they take up more memory. 
e Different variable types can have what appears to be the same name. 
e.g. NA$, NA% and NA are all different variables. 
e Variable names must not contain reserved words — ie. words which 
BASIC recognises as commands. 
e.g. BASIC would read ТОР$ as TO P$ since TO is a reserved word. 
This is a consequence of spaces between keywords and variables being 
optional. 
FIRSTHENS would be read as FIRS THEN S since THEN is a reserved 
word. 
This type of thing usually results in a SYNTAX ERROR in lines that look 
OK. 


e Assigning values to variables is done using “=” 


e.g. NAMES = “JOHN” 
SKILL% = 50 
FROD$ = NAMES — this assigns the value of 


NAMES to РАОО$ 


SKILL% = SKILL%+10 — this takes the old value of 
SKILL%, adds 10, and assigns 
the result as the new value of 
SKILL% 

e As the name implies, the value of variables may vary. 

e Only the correct type of information may be assigned to a variable. 

Trying to assign a number to a string variable, or a string to a numeric 

variable will cause a TYPE MISMATCH error. 

e.g. NAMES - 72 - type mismatch 
SKILL% = “HARRY” — type mismatch 

String Variables 

А string is a series of characters contained within opening and closing 

quotes. 

e.g. "This is a string" 

Thisisnotastringitisaverylongvariablename 

e Strings can be concatenated - ie. joined together using the “+” 

symbol 

e.g. BS = "THE COMMO " 

A$ = B$ + “DORE 64" 

The value of A$ is now the string “THE COMMODORE 64” 

e Concatenation can be used to put characters in strings that you 

couldn't normally put in — for example, the double quote character. 

e.g. A$ = ""STRING" " will not work because it will be read as an empty 
string (4 "), then STRING, then another empty string. This will not 
make sense to BASIC 
AS = СНЕ$ (34) + "STRING" + CHR$ (34) 

This concatenates the value of CHR$ (34), “, with STRING and, ", giving 

"STRING" 

This technique can also be used to give multicoloured displays 

e.g. A$ = CHR$ (30) --"THE" + CHR$ (31) + "END" _ 

PRINT А6 will now display a green THE and a blue END. 

e String variables can be very useful in getting "bombproof" input from 

the keyboard. 

For example, imagine you are writing a program which at some point 

prompts the user to type in a number. You can do this by using 

INPUT "NUMBER",A 

To execute this the Commodore 64 prints the string and a question mark, 

and waits for the user to type in a number which it will assign as the value 

of A. But, if the user types in a non-numeric character, this will cause the 
error message REDO FROM START to be displayed. It skips down a line 
and displays the question mark again, waiting for a number. It will 
continue to do this until a number is input, or the program is stopped. This 
can be confusing to a user who doesn’t know the meaning of REDO 
FROM START, and it can also destroy screen displays. 


To avoid this, use 
INPUT "NUMBER",A$ 
Now the Commodore 64 expects a string, so whatever(almost) the user 
types will be OK. Of course this means that the program will have to do a 
little more work, converting the string to a number. To do this, use 
A=VAL(A$) 
If A$ is a string containing only a number, A will become that number 
e.g. A$ = "7.63" 
А = VAL (А) 
The value of A is now 7.63 
If A$ contains non—numeric characters, VAL(A$) will return 0. Thus, the 
programmer can arrange to print meaningful error messages and 
reprompt the user without destroying screen displays. 
e Commodore 64 BASIC has extensive string manipulation functions — 
RIGHTS, LEFT$, MID$, + (see Commodore 64 BASIC Commands) 
e If no value is given to a string variable, its value is the empty string. 


Floating Point Variables 


Floating point numbers can be integers, fractions preceded by a decimal 
point, or a combination of the two. 
e.g. 6, 7.346, 0.593, -0.762, -3 
e They can be up to 9 digits long 
e Ша number with 10 or more digits is entered, it is automatically 
converted to scientific notation. 
e.g. 12345678912 

is displayed as - 

1.23456789Е--10 
The number after the E indicates the number of positions the decimal 
point must be moved to give its true position. If it is positive, the decimal 
point is shifted to the right; if negative, to the left. 
Note that the last two digits in the original number are rounded off. In 
general, if the 10th digit is 5 or more, the number is rounded up. If itis 4 or 
less, it is rounded down. 
e.g. 1234567886 is displayed as 1.23456789Е--9 

.1000000014 is displayed as .100000001 
e There is a limit to the size of the numbers the Commodore 64 can 
handle 

smallest > 2.93873588Е-39 

largest < 1.70141183Е +38 
Any number smaller than the lower limit is treated as 0. Any number 
larger than the upper limit gives an OVERFLOW ERROR. 
e Floating point numbers can be entered from the keyboard in scientific 
notation. 
e Floating point variables don't have a special last character 
e.g. FP, FLOAT, X, L1 


e If no value is given to a floating point variable, its value is 0 
integer Variables 


Integers are numbers without a decimal point. They may be negative or 
positive. Unsigned integers are assumed to be positive. 


e.g. 6, +63, -7, -7934621 

e integer variables are distinguished by % as the last character. 

e.g. NUM%, 5С%, F% 

e Integers may be assigned to floating point variables since they are а 
subset of floating point numbers. However, they will take 5 bytes for 
storage compared to 2 bytes if assigned to integer variables. 

e If no value is given to an integer variable its value is 0. 

e In most calculations the Commodore 64 converts integers to floating 
point numbers and, if necessary, converts the result back to an integer. It 
is therefore slower to use integer variables than to use floating point 
variables. 


Arrays 


Arrays are used to store large amounts of related information without 
having to assign a variable name to each data item. Instead, a name is 
assigned to the array as a whole, and the individual data items are 
referred to by their position in the array. 

e Arrays are set up using a DIM statement 


e.g. DIM A$ (12) 
This will set up a 1 dimensional string array with 13 elements. There are 
13 because numbering of array elements starts from 0. This array has 
the elements A$ (0) through to A$ (12). 
DIM B% (4) 
This sets up an integer array of 5 elements — B% (0) to B% (4) 
DIM C (2,4) 
This sets up a 2 dimensional floating point array with 15 elements, 3 rows 
each of 5 elements. 
C (0,0) C (0,1) C (0,2) С (0,3) С(0,4) 
С (1,0) С (1,1) С (1,2) С (1,3) СП) 
С (2,0) С (2,1) С (2,2) С (2,3) С (2,4) 
ОМ 0$ (1,1,1) 
This sets up a3 dimensional string array of 8 elements - D$ (0,0,0) to D$ 
(1,1,1) 
* Array elements аге used just as a variable of the same type is. 
e.g. PRINTC (1,3) 
Х=С (2,1) 
D$ (1,0,1)2 "HI" 
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e You cannot refer to the entire array at one time. 
e.g. "PRINT A$" will not display the 13 elements of the array A$. To do 

this you would need the following: 

FOR J=0 TO 12 : PRINT A$ (J) : NEXT 
e Arrayscan hold only one type of data. An attempt to store an integer in 
a string array, or a string in a floating point array will produce a TYPE 
MISMATCH error. 
e Like variables, array elements have default values. When an array is 
first DIMensioned, all its elements take the default value for that variable 
type. ie. a string array is filled with null strings, a numeric array is filled 
with O's. 
e Arrays can also have default sizes. That is, you can refer to an array 
element without having first DIMensioned the array. However, this only 
applies to 1 or 2 dimensional arrays. The default DIMension is 10 - ie. 11 
elements for each subscript used to reference an array element. In this 
case the Commodore 64 has implicitly DIMensioned the array for you. 
This can be confusing when the program is read later, so it's better to 
explicitly DIMension all arrays — ie. use a DIM statement. 
e Arrays can be DiMensioned only once in a program. This also applies 
to arrays the Commodore 64 has implicitly DIMensioned for you. In other 
words, 

10LETA (1) = 0 

20 DIM A (5) 
will result in a RE -DIMENSIONED ARRAY error 


Operators 

Expressions are made up of operators and operands. Operators are 
symbols recognized by the Commodore 64 as representing operations 
to be performed on the operands. Operands may be variables, constants 
or other expressions. Expressions return a value, and hence may be 
used almost anywhere a variable of the same type could be used. There 
are exceptions to this however, such as GOTO statements. These 
exceptions are explicitly noted in the description of BASIC commands. 
Arithmetic Operators 

Arithmetic expressions return an integer value if all operands аге 
integers, and a floating point value if any of the operands are floating 
point numbers. Most of these operators you will have met before, so a 
few examples will suffice. 

Addition ‘+’ 

6--4, B%+C+6 

Subtraction '—' 

7-3, 18—36, B% -C 

The minus sign is also used to signify a negative number. 
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Multiplication '*' 

7*8, В%*8, 16*C*B% 

Division '/' 

The value on the left of the slash is divided by the value on the right. 
7/4, B%/C 


Exponentiation‘ ? ' 

The value on the left of the arrow is raised to the power of the value on the 
right. 

A15,213,61B96 

Order of evaluation 

An expression may contain multiple operators. The order of evaluation of 
the sub—expressions depends on the precedence of the operator in 
each sub-—expression. Operators with the highest precedence аге 
carried out first. A table of operator precedences appears at the end of 
the section on operators. 


String Operators 
Concatenation ‘+’ 
The plus sign can also be used to concatenate strings. 
e.g. "FREE" + "DOM" returns "FREEDOM" 
if A5- "STING" and B$=“RAY” 
А$+В$ returns "STINGRAY" 
Concatenation can be used to build strings up to 255 characters long. An 
attempt to build a longer string will result ina STRING TOO LONG error. 


Relational Operators 
These are used to compare strings or numbers. If the expression is true, 
—1 is returned, if false, O is returned. This means that it is possible to 
perform arithmetic operations on the result of a relational expression. 

The operators are: 


: equals 

TA : is greater than 
OL : islessthan 
= &'or' < =' : islessthan or equal to 
‘= > or’ > = : is greater than or equal to 
Ed 7. : notequal to 
e.g. 6 = 6-returnstrue (—1) 

6 < 4-returns false (0) 

6 € 6-returnsO 

6 <=6-returns –1 


A% < > В%-гевші depends on the value of A96, B% 
Strings can also be compared. This is done character by character, using 
the Commodore 64 character code. 
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e.g. "C" & "D" returns true (-1) since the code for 'C'-67- is less 
than the code for 'D' —68 
"CAT" > "CATION" results in false (0) 
А%-С%-- D$ result depends on the values of A$, C$ and D$ 


Boolean Operators 
These, named after the logician George Boole, are used to carry out 
logical operations. 


AND 


The result of an AND expression is true only if both operands are true, 
false otherwise. 
e.g. 6 > 5АМО4 < 5returnstrue 

6 < 5ANDA < 5returns false 

6 > БАМО5 < Areturns false 
IF A=22 AND B=20 GOTO 600 - result: GOTO line 600 if both A=22 
and B=20 


OR 


The result of an OR expression is true if either operand is true, false only 
if both operands are false. 
e.g. 6 > БОН4 < Sreturns true 

6 < 5ОН4 < 5Sreturns true 

6 < 5085 < 4returns false 
IF A=22 OR В=20 OR C=6 THEN GOSUB 20 - result: GOSUB 20 if 
any of the conditions are true 


NOT 
This takes only one operand. The result is the logical opposite of the 
operand. 
e.g. NOT (6 > 5)returns false 
(6 < 5084 < 5)returns false 

A single operand can be tested for true or false. It acts as ifithas' < > 0 
appearing after it, so any value other than 0 will return true. 
e.g. IF 6 THEN GOTO 60 - result: GOTO executed 

IF AHIT% THEN GOSUB 700 - result: depends on the value of the 

variable AHIT% 
Boolean operations can also be carried out on bits. However, this is best 
described after a more detailed discussion of the binary number system. 
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Table of Operator Precedences 


Precedence| Operator 


Used to over-ride normal precedences 
exponentiation 

signifies negative number 
multiplication 

division 

addition, concatenation 

subtraction 

equals 

not equal to 

less than 

greater than 

less than or equal to 

greater than or equal to 

logical opposite 
logical AND 

logical inclusive OR 


MuR Т тыс 


== 


e As noted above, parentheses, () сап be used to over- 
ride precedences. You can, for example, force an addition to be carried 
out before a multiplication by parenthesising the addition expression. 
e.g. 4°6+2 returns 26 

4*(6+2) returns 32 
Operators with the same precedence are executed from left to right. 


BINARY AND HEXADECIMAL NUMBER SYSTEMS 


The decimal, binary and hexadecimal number Systems all use the same 
principle. Each digit position in a number represents the power to which 
the base is raised. The digit in a position is multiplied by the result of the 
base being raised to its relevant power, and the results of these 
calculations are added to give the final value. The only difference 
between the three number systems is the base. The decimal system 
uses 10, the binary system 2 and the hex system 16. 
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e.g. decimal 1 2 4 
10? 10 10 


= 100+ 20 +4 = 124 


binary 1 0 1 1 0 1 
25 2 2 2? 2! 2 


decimal equivalent =32 +0 +8 +4 +0 +1 = 45 


When working with hex, the letters A—F are used as the hex equivalents 
of the decimal numbers 10 — 15 
e.g. F 3 

16 16 


decimal equivalent = 240+ 3 = 243 


When addresses need to be POKEd into memory (as for the USR 
function) they must be POKEd a byte at a time even though they are 2 
bytes long. To calculate the decimal POKE values for each of the two 
bytes, convert the number into hex, then change the two hexadecimal 
bytes back to decimal. 
e.g. hex address 1000 
In decimal this is 7424, but you can't POKE this value. So take the high 
byte (1D) and convert it to decimal 

1 D 


16! 16 
= 16 +13 = 29 POKE Address + 1, 29 
now the low byte 
0 
16 16 
0 0 =0 POKE Address, 0 
Logical Operations on Bits 


When AND, OR and NOT operands have numeric operands they are first 
converted to 2 byte 2's complement integers in the range -32768 to 
32767. If they are not in this range an error message results. 

The logical operation is then carried out on bits. If the operator is AND (or 
OR) the zero bit of operand 1 is ANDed (or ORed) with the zero bit of 
operand 2. This is repeated for the bit 1 pair, the bit 2 pair and so on. 


e.g. 1 1 
AND; АМО о 
=1 =0 
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ORing two bits which both have value 0 results in а 0. Any other 
combination produces 1. 


e.g. 0 1 
ORO OR 0 
=0 =1 


If the operator is МОТ, all of the bits are complemented, i.e. a 1 becomes 
a 0 and vice versa. 


Masks 

As you will see it is sometimes necessary to change or read the values of 

only some bits of a byte, leaving the others unchanged or unread. The 

method used to do this is called masking. 

For example, to check the value of only the last 4 bits of byte 36876 we 

AND the mask 15 with the byte value. It's easier to see how this works in 

binary notation. 

value of 36876 - - – - 1 

AND 15 00001 
-0 0001 

Because the first 4 bits of the mask аге 0, ANDing them will always 

produce 0 in the first 4 bits of the result, no matter what values were in the . 

first 4 bits of 36876. Because the last 4 bits of the mask are 1, ANDing 

them will leave the values of the last 4 bits of 36876 unchanged. In 

general, to make a mask for PEEKing, put a 1 in bit positions you want 

unchanged, а 0 in those you don't want to know about. 

For POKEing 1 into certain bits, an OR mask should be used. For 

example, to set bit 2 in 36876 OR the mask 4. 

e.g. POKE 36876, PEEK(36876) OR 4 

Again, it's easier to see how this works in binary. 


value of 36876 - - - - 1010 
OR 4 00000100 
- ~---1110 


To POKE 0 into certain bits, AND a mask with 0 bits in the positions you 
want set to 0, 1 in those you want left unchanged. 
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СНАРТЕН 2 


COMMODORE 64 BASIC Commands 


The following describes, in alphabetic order, all the BASIC commands 
available on the Commodore 64. Those that are described as functions 
return values, like expressions, and can therefore be used where values 
of the appropriate type can be used. As with expressions, there are 
exceptions to this. Note that functions appearing in expressions are 
evaluated before operators, unless the operators are parenthesized. 


ABS 


AND 


ASC 


: function 
: ABS ( [number] ) 


ABS ( [numeric variable] ) 
ABS ( [numeric expression] ) 


: returns the absolute value of its argument ie. positive values are 


unchanged, negative values become their positive equivalents 
e.g. ABS (6) returns 6 

ABS (- 72.3) returns 72.3 

ABS (6--4* —3) returns 6 

ABS (А%) returns positive magnitude of A% 


: operator 
: [expression] AND [expression] 
: returns true (— 1) if both expressions are true 


returns false (0) if either or both expressions are false 
e.g. Е Х=1 ANDY < =7 THEN СОТО 60 

IF НІТ% ANDZ < > 6 THEN GOSUB 70 
NOTE: AND can also operate on other numeric values 
(see page 15). 


: function 
: ASC ( [character string] ) 


ASC ( [string variable] ) 


: returns the character code value of the first character in the string 


e.g. ASC (A) returns 65 
ASC (BAT) returns 66 
ASC (A$) returns code of first character of AS 
ASC ("") null string produces ILLEGAL QUANTITY error 
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АТМ 


: function 
: ATN ( [number] ) 
ATN ( [numeric expression] ) 
: returns the arctangent of its argument in radians. The result is in 
the range: +V2 to - V2 
e.g. ATN (3) returns 1.24904577 
ATN (6*3—15) returns 1.24904577 


СНН% 


: function 
: CHR$ ( [number] ) 
СНН% ( [numeric expression] ) 
The argument to CHR$ must be between 0 and 255. 
: returns the single character string whose code is equal to the 
CHR$ argument 
e.g. CHR$ (65) returns ‘A’ 
PRINT CHR$(13) will print a RETURN - ie. the cursor will 
act as though the RETURN key has been pressed. 
Colour and reverse mode can also be controlled in this Way. 


CLOSE 
: statement 
: CLOSE [file number] 
: closes the file started in an OPEN statement. You should execute 
a PRINT# to that file before closing it, to make sure that all data 
has been transmitted from the buffer. 
e.g. OPEN 1,4 :PRINT#1, END DATA : CLOSE 1 


CLR 

: statement 

: CLR 

: This is not equivalent to the CLR key! This statement clears out 
any variables that have been defined, un —DIMensions any arrays 
that have been defined and RESTORES the DATA pointer to the 
beginning of data. It also closes all logical files currently open. The 
commands RUN, LOAD and NEW all automatically execute a 
CLR statement. Note that the program itself is left untouched after 
a CLR statement. 
e.g. 10 A% = 53: CLR: PRINT A% 

This will display a 0 


CMD 


: Statement 
: CMD [file-number] 
Normally, the screen is used to display output - i.e. itis the default 
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output device. Тһе СМО statement changes the default output 
device to the file number given as argument. This enables you to 
redirect everything normally displayed by the Commodore 64 to, 
for example, the printer. A CMD statement must be preceded by 
an OPEN statement. There are 3 ways to exit the CMD mode: 
1) Press RUN/STOP and RESTORE keys. This will 
reset the Commodore 64 to its default condition. 
2) Use the CMD statement to change the default output. e.g. 
CMD 3 makes the screen the default. 
3) Execute a PRINT [file- number]. This is preferred since it 
also empties the printer buffer. 
e.g. 10 OPEN 1,4- opens a channel to the printer 
20 CMD 1 - makes printer default output 
30 LIST - lists the program currently in memory to the printer 
40 PRINT#1 - makes sure the printer buffer is empty, and 
exits the CMD mode 
50 CLOSE 1 - closes the channel to the printer 


CONT 


: statement 

: CONT 

- This continues a program which has stopped due to а STOP 
keypress, or the execution of a STOP or END statement within a 
program. CONT will not work if the program stopped due to an 
error, or if an error is made while the program is stopped, or if any 
attempt is made to edit the program (even if nothing in the 
program is actually changed). Variable values may be examined 
and changed, and the program may be listed. 


cos 


: function 
: COS ( [numeric expression or variable or constant] ) 
: returns the cosine of the argument in radians 

e.g. COS (0.4) returns 0.921060994 


DATA 


: statement 

: DATA [constant], [constant],.......,... 
There may be one or more numeric or string constants. String 
constants need not appear within double quotes, unless the string 
contains graphics characters, commas, spaces or colons. Two 
commas with nothing between them will be read as either O or the 
null string, depending on the variable type the data is being read 
into . DATA statements may appear anywhere in a program. 
Since they need not be explicitly executed during the running of 
the program they may appear after an END statement. 
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: Provides data for a READ statement 


e.g. 10 DATA 6, —73.2, HELLO,"10 DATA", “A.,B” 
20 DATA 7,23,, GOODBYE 


: Note: DATA statements cannot be used in immediate mode. 


DEF FN 


DIM 


: statement 
: DEF FN [name] ( [parameter] ) = [expressions] 


[name] must be a floating point variable name 5 characters or less 
in length. [parameter] must be a numeric variable name. 
[expression] must be numeric, user—defined; string functions are 
illegal. Previously defined functions may appear in [expression] 


: defines a function with 1 parameter which may be referenced later 


in the program 

e.g. 10 DEF ЕМА (X) = X+ 3 - define the function 
20 PRINT FNA (2) - execute the function, replacing the 
parameter with value 2 result - displays 8 (2 + 3) 
30 PRINT FNA (2) - replace parameter with value of Z result 
- displays value ofZ + 3 


: Note: Can only be used in program mode, although functions 


defined in program mode may be used in immediate mode. 


: Statement 
: DiM[variable] ( [integer] [integer],...) 
: The [variable] identifies the array name and type. The integers 


indicate the number of elements in each dimension of the array. 
Since numbering of array elements starts from 0, DIM A(10) 
defines an array with 11 elements. The number of integers 
indicates the number of dimensions in the array. DIM A$(4,4) 
defines a 2 dimensional array of 25 elements. A DIM statement 
may define more than one array. 

e.g. DIM A$ (6), B (7,2), C% (1,2) 


: defines an array. One or two dimensional arrays of 11 elements (1 


per.dimension) may be used without a DIM statement, since the 
Commodore 64 will implicitly define them for you when they are 
first referenced. 

Arrays may be DiMensioned only once (even those implicitly 
defined). 

Only elements of the type specified by the array name may be 
Stored in the array. 

The following table can be used to calculate the amount of 
memory used by arrays: 

5 bytes — array name 

2 bytes — each dimension 

2 bytes/element — each integer value 
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5 bytes/element — each floating point value 

3 bytes — each string variable 

1 byte/character — in each string element 

e.g. 10 DIM A$ (10) - defines string array of 11 elements 
20 DIM B% (3,5) - 2 dimensional integer array of 24 
elements 
30 DIM С% (6), О (7,6,3) - string array - 7 elements and 
floating point array — 224 elements 
40 PRINT C$ (3) - displays fourth element of array C$ 
50 D (1,4,2) = 6.2 - assigns 6.2 as value of D (1,4,2) 
60 A$ = C$ (1) - assigns value of C$ (1) to AS 

(See Data Structures section for details of arrays) 


END 

: statement 

; END 

: stops a program and returns control to the user. Doesn't clear 
variables, array pointers or program, so CONT may be used to 
continue the program. There may be any number of END 
statements in a program. Useful for debugging. 
e.g. 100 INPUT "CONTINUE", A$ 

110 IF A$ = "NO" THEN END 


200 END 


EXP 


: function 

: EXP ( [number] ) 

: returns e (2.71828183) raised to the power of [number] 
:e.g. EXP (2) returns 7.38905613 


FOR-TO-STEP- / NEXT 


: statement 

: FOR[variable] = [start] TO [limit] STEP [step] / NEXT [variable] 
FOR [variable] = [start] TO [limit] / NEXT [variable] 
FOR [variable] — [start] TO [limit] / NEXT 
[variable] must be floating point. When STEP is omitted [step] iS 
assumed to be 1. [start], [limit] and [step] may be negative, 
positive, constants, variables or expressions 

: performs a loop through all statements between the FOR and 
NEXT statements. 
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ЕВЕ 


ОЕТ 


A FOR loop is always executed at least once, since the variable 
value is compared to the limit at the end of the loop. 
The loop terminates when the variable value is greater than the 
limit (if [step] is positive) or less than the limit (if [step] is negative). 
FOR loops may be nested to a depth of 10. When nested loops 
terminate at the same point the NEXT statement may contain 
more than one variable name. e.g. NEXT 1,Ј,К. In such a case 
make sure the order is correct. Innermost loops must terminate 
first. 
e.g. 10FOR Ј= 7 TOBSTEP –3 

20... 

30... 

40 NEXT J 


10FORJ -0TO6 

20 ... 

30 FOR K = 0 TO -5STEP -1 
40 ... 


50... 

60 NEXT K, J 

Note: When used in immediate mode, a multiple statement 
line is necessary. 

FOR J= 1 ТО 5 : PRINT CHR$ (J) : NEXT 


: function 
: FRE ( [dummy value] ) - the value of dummy is unimportant. 
: returns the number of free bytes of memory, as is done 


automatically when the Commodore 64 is started. If the result 
returned is negative, add 65536 to get the true number of free 
bytes.FRE(0) — ( FRE(0) < 0)* 65536 will always return the 
correct value 

e.g. PRINT FRE (0) 


: Statement 
: GET [variable] 
: checks the keyboard buffer and assigns the first character in it to 


the variable. If there is nothing in the buffer it assigns the null string 
to a string variable, or 0 to a numeric variable. The character it 
GETs is not echoed on the screen. A RETURN keypress is not 
necessary after typing the character. In fact it will GET a RETURN 
quite happily, just as it would almost any other character. Since 
GET doesn't wait for a key to be pressed, it is usually placed in a 
loop. 
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e.g. 10 GET A$ : IF A$ = "" THEN GOTO 10 
5 PRINT “PASSWORD 2" 
20 GET P$ 
30 IF P$ = "" THEN 20 — wait for keypress 
40 IF P$ = CHR$(13) THEN END - check for RETURN to 
signal end of password 
50 PW$ = PWS$ + P$ — build password, character by 
7-7 іп РМ. Note that PWS starts off as “ ", the null 
string. 
60 GOTO 20 – get next character of password 
Note: GET cannot be used in immediate mode. 


СЕТ# 
: statement 
: GET [file—number],[variable] 
: same as GET, but gets characters from a previously OPENed 
input device such as cassette or disk drive. 
e.g. 10 OPEN 1,3 
20 FOR J = 1 ТО 30 
30 GET#1,B$ : A$ = А$ + BS 
40 МЕХТ 
50 CLOSE 1 
This gets a buffer full of data from input device, stops device and 
then proceeds to read the data from the buffer. In this case it gets 
the first 30 character from the buffer and builds up the string A$ 
character by character. 


GOSUB/RETURN 

: :tstatement 

: :GOSUB[line - number] / RETURN 
[line — number] cannot be a variable or expression 

: branches to [line — number]. Execution continues from this line 
until a RETURN statement is read. Then control branches back to 
the GOSUB statement. Execution continues from the statement 
after theGOSUB statement. 
There may be more than one RETURN statement to cause the 
branch back to GOSUB. If a RETURN statementis read without a 
GOSUB first having been executed a RETURN WITHOUT 
GOSUB error will result. GOSUBs may be nested. 
Note: The RETURN statement and the RETURN key are quite 
different. 

: e.g. 10 GOSUB 560 


560 IF K$ = "Y" THEN GOSUB 600 : RETURN 
570 IF KS = “М” THEN PRINT "WHY NOT" : RETURN 
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580 PRINT "ANSWER MUST BY Y ORN" 
590 RETURN 


600... 


675 ВЕТУНМ 

This example shows the use of multiple RETURNs and 
nesting of GOSUBs. GOSUB 600 is nested inside 
subroutine 560. GOSUBs may be nested to a greater depth if 
desired. 

(For more on GOSUB see Control Structure section) 


GOTO 
: statement 
: GOTO [line — number] 
[line number] cannot be a variable or expression. 
: causes the program to branch to [line-number] if such a line 
exists.It is also used in immediate mode to start a program 
from a particular line, (same as RUN). 
e.g. 10 GOTO 200 


200 ... — execution continues here 


IF — THEN 

: Statement 

: IF [condition] THEN [statement(s) ] 

[condition] may be logical expression, numeric expression or 
variable name. 

: If the condition is true the statements after the THEN are 
executed. If the condition is false the THEN statements are 
ignored and execution continues from the next line. | 
Logical expression evaluate to —1 (true) ог 0 (false). Numeric 
expressions and variables are treated as false if they evaluate to 0 
and as true if they evaluate to any other value. 

When the statement immediately following the THEN is a GOTO 
[line — number], the line — number alone is sufficient. 
e.g. IF A$ = "YES" THEN 70 will execute a GOTO 70 if the 
condition is true. 
Alternatively, THEN may be omitted if GOTO is retained. 
e.g. IF A$ = "YES" GOTO 70 
e.g. 10 IF (A = 6 OR B = 7) THEN GOSUB 70 : PRINT A$ 
201F HIT THEN 700 — where HIT is a variable whose value is 
normally 0, but is set о — 1 when a collision occurs. 
30 IF NOT(A=7 AND B=4) THEN 70 
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ІМРОТ 
: statement 
: INPUT [variable list] 
INPUT [string];[variable list] 
[string] must be a string constant, e.g. PROMPT" 
[variable list] may be 1 or more variables separated by commas 
; where there is no string, the user is prompted for input by a “2”. 
Where there is a string, this is printed, followed by ? . INPUT 
differs from GET in that it waits for input, may accept more than 
single characters, echoes input on the screen, and requires a 
RETURN keypress to terminate input. Where the variable list 
contains more than one variable, values must be typed separated 
by commas. The values are assigned to the variables in order. If 
the user types in too few values, the ? reappears and INPUT 
waits for more input. If too many values are typed, the message 
EXTRA IGNORED is displayed. This is not an error and 
execution continues. 
If [string] is too long (the prompt string has a maximum length of 20 
characters), INPUT will read all of the string with the input when 
the input is a string, or return a REDO FROM START otherwise, 
SO keep prompts reasonably short. If the user types in a value of 
the wrong type for the variable it is to be assigned to, a REDO 
FROM START message appears, and the user is prompted for 
correct input by “2”. 
e.g. 10 INPUT A — displays "?" and waits for a number to be 
typed, followed by RETURN key. 
20 INPUT B, C$ — displays “?”, waits for a number followed 
bya comma, a string and RETURN key. 
30 INPUT "PRICE?"; D — displays "PRICE?", waits for 
number, RETURN key. 
Note: Cannot be used in immediate mode. 


INPUT# 


: Statement 

: INPUT [file—number], [variable list] 

: accepts input from an OPENed file by reading that file into the 
buffer and assigns each data item to a variable in the variablelist, 
in order. Data items must agree in number and type with the 
variables in the variable list. If an end—of—record is read before all 
variables in the variable list have been assigned values, an OUT 
OF DATA status is generated but the program continues to 
execute. 

INPUT# does not display error messages, it reports error 
statuses, in the status byte, that the program must respond to. 

: because the input buffer is only 80 characters long, an input string, 
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INT 


together with separator, cannot be longer than this. Commas and 
RETURNS act as separators. They cannot act as data - you need 
a GET# for that. 
e.g. 10 OPEN 1,1 - default values used so this OPENs the 
datatsette 
20 INPUT# 1,A$,C,D,E$ — and reads these from buffer. 
Note: INPUT# can only be used in program mode. 


: function = 
: INT ( [numeric variable, constant or expression] ) 
: returns the largest integer less than or equal to the argument. 


e.g. 10 PRINT INT(6.23) — displays 6 
20 PRINT ІМТ(-4.2)- displays -5 
30 Х% = INT(43.4) — assigns value 43 to X96 
40 PRINT INT(14) — displays 14 
50 PRINT INT(A) — displays integer value of A 


LEFTS 


LEN 


: function 


LEFTS ( [string variable, constant or expression] , [integer] ) 


: returns a string consisting of the first [integer] characters of the 


original string argument. If [integer] is greater than the length of 
the string, the entire string is returned. If [integer] is 0, the null 
string is returned. 
e.g. 10 A$ = "TEST STRING" 

20 B$ = LEFTS$(A$,4) 

30 PRINT B$ - displays "TEST" 

40 PRINT LEFT$("GOODBYE",3) - displays "СОО" 

50 A$ = LEFTS(A$,3) + LEFTS(A$,4) 

60 PRINT A$ — displays "TESTEST" 


: LEFTS is often used to postion the cursor. A string of cursor 


control characters is created which, when printed, moves the 
cursor across or down the screen. LEFT$ can then be used to 
control how far across or down the screen the cursor is positioned. 
e.g. 10 A$ = "CRSR CRSR Ea 
20 PRINT LEFTS(A$,10) — moves the cursor across the 
screen 10 spaces. 


: function 
: LEN ( [string variable, constant or expression] ) 
: returns the length of the string argument. Blanks апа 


поп printing characters are counted. 
e.g. PRINT LEN (“HARRY”) - displays 5 
10 A$ = "MIGHTY" 
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20 B$ = LEFT$ (A$,LEN$(A$)-1) 
30 PRINT B$ - displays "MIGHT" 


LET 


: statement 
: LET[variable] = [value] 
: assigns the value on the right to the variable on the left. The word 
LET can be omitted, and so is rarely used. 
e.g. 10 LET A$ = "HELLO" 
20 A$ = HELLO - equivalent to line 10 
30 C$ = LEFT(A$,4) - assigns HELL to C$ 
40 D$ = C$ - assigns value of C$ to D$ 
LIST 


: statement 

: LIST — displays entire program 

: LIST [line — number] - displays line [line – number] 

: LIST - [line- number] - displays from start of program to line 
[line - number] (inclusive) 

: LIST [line - number] — - displays from line [line - number] to end 
of program 

: LIST [line- number1] - [line-number2] - displays from line 
[line - number1] to (line - number2] (inclusive) 

: displays all or part of the program in memory as detailed above. If 
the program exceeds the length of the screen display, the screen 
will scroll up. This may be slowed down by holding down the CTRL 
key, or stopped using the STOP key. 


e.g. LIST — 100 
LIST 50 — 999 
LIST 20 


: Н used in program mode, the program will stop after LISTing. 

Typing CONT at this point will only repeat the LISTing. 
LOAD 

: statement 

: LOAD 
LOAD [filename] 
LOAD [filename ],[device] 

: transfers a program from cassette or disk into memory. 
If there are no arguments to LOAD, the next program found on 
tape will be LOADed. 
If there is a ['filename"], the Commodore 64 will search the tape 
until a program of that name is found, and load it. [device] 
specifies the device the program is loaded from. If it is 8, the 
program will be loaded from disk, if it is 1, from tape and if it is not 
present, the default value is 1, i.e. tape. 
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LOG 


MIDS 


NEW 


e.g. LOAD - loads next program on tape 
LOAD "MYPROG" - searches tape for program called 
"MYPROG'" and loads it if it is found. 
LOAD A$ — searches tape for program whose name is the 
value of А$ and loads it. 
LOAD "*",8 — loads first program found on disk. 
LOAD “PR*” , 8 — loads first program whose name begins 
with "PR" from disk. 
LOAD “МВ”, 8 — finds program "NB" on disk and loads it. 


: When used in immediate mode, a CLR statement is automatically 


executed. When used in program mode, if the new program is 
shorter than the old one, variables will not be cleared, so the new 
program may use the old variable values. 


: function 

: LOG ( [numeric variable, constant or expression] ) 

: the argument to LOG must be greater than O 

: returns the natural logarithm of the argument, ie. the power to 


which e must be raised to give the argument. 
e.g. 10 PRINT LOG(6.42856) — displays 1.86075056 


: function 
: MID§ ( [string variable, constant or expression], [from], [length] ) 


MID$ ( [string variable, constant or expression], [from] ) 


: returns a string of length [length] consisting of the characters 


starting from the [from]th character of the string argument. If 
[length] is omitted, returns the entire string from the [пот 
character on. If [length] is greater than the length of the string 
argument, the null string is returned. 
e.g. 10 PRINT MIDS("HELLO",2,3) - displays “ELL” 

20 PRINT MID$("^GOODBYE",1,4,) — displays "GOOD" 

30 X$ = "HATTRICK" 

40 PRINT МІО$(Х$,4) — displays "TRICK" 


: statement 
: clears program from memory and resets variables 
eg. X=6.2 
PRINT X – displays 6.2 
NEW 


PRINT X — displays 0. Old value of X is lost as are any 
program lines. 


: Using NEW in program mode will clear the program in which it is a 


program statement. 
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МОТ 


: logical operator 

: NOT [expression or variable] 

: logically negates the truth value of [expression] 
: 10 IF NOT(A=6 AND B=9) THEN 70 


ON 


OPEN 


If the expression (A=6 AND B- 9) is false then NOT(A=6 AND 
B=9) is true and the program branches to 70. 

20 IF NOT HIT THEN GOSUB 500 

Assume HIT is a variable set to —1 when a collision between 
game characters occurs, 0 otherwise. Then NOT HIT will evaluate 
to true when there is no collision, and the appropriate action 
(subroutine 500) can be taken. 

NOTE: NOT canalso operate on other numeric values (see p 15). 


: statement 
: ON [variable or expression] GOTO [line — number list] 
ON [variable or expression] GOSUB [line — number list] 
[line — number list] is a series of line питбегѕ separated by 
commas 
: causes the program to branch to one of the line—numbers 
depending on the value of the ON argument. If the argument 
evaluates to 1, the program branches to the first line — number, if 
2 then it branches to the second line—number, etc. If the 
argument evaluates to 0 or to a number greater than the number 
of line—numbers then the statement is ignored. If the argument 
evaluates to a negative number an error occurs. 
e.g. 10ON X%+3 GOTO 50,72,143,90 
20 ON В% GOSUB 70,90,90,300 
30 ON INT(B*C/3) GOTO 20,60,90,15 


: statement 

: OPEN [file— number] 
OPEN [file - number],[device - number] 
OPEN [file —number], [device - number],[command – питбег) 
OPEN [file number] , [device — number] , [Command — number] , 
[string] 

: OPENS a logical channel for input or output to a device. When a 

channel is OPENed to an external device, a buffer is 
automatically set up. Transmission and receipt of data occurs a 
whole buffer at a time. 
[file — number] is the logical name of the channel, It can be any 
number in the range 1—255, and is the same number used in 
INPUT#, GET#, PRINT# and CLOSE statements to work with 
this device. 
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[device - number] specifies the device as below: 


Device Number Device 
0 keyboard 
1 cassette - default device 
2 RS232 device 
3 Screen 
4 printer 
5 printer 
8 disk drive 
4-127 serial bus device 
128-255 serial bus device - and send a 


linefeed (If) after carriage return. 


: [command - number] must be in the range 0—255. The same 
command number will have different effects depending on the 


device specified. 
Device Command Number Effect 
Cassette 0 read tape file 
1 write tape file 
2 write tape file and put EOT (end 
of tape) marker when channel 
CLOSEd 
Disk 1-14 open data channel 
15 open command channel 
Keyboard 1-255 no effect 
Screen 1-255 no effect 
Printer 0 upper case/graphics 
7 upper/lower case 


: [string] is sent to the printer or screen as if а PRINT# were 
performed to the device. With the cassette deck it is used as the 
filename. With the disk drive it can be either a filename or a 
command, depending on the command number. 

e.g. OPEN 1,0 – open channel to keyboard 
OPEN 1,1,0 — open channel to cassette for reading only 
OPEN 1,1,0, MYPROG - open channel to cassette for 
reading only. When a read is done, the Commodore 64 will 
search tape for "MYPROG" 
OPEN 1,3 — open read/write channel to screen 
OPEN 1,8,15, command — open channel to disk and send 
command 


OR 


: logical operator 
: [expression] OR [expression] 
: produces a true result (—1) if either or both of the expression are 
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РЕЕК 


РОКЕ 


РО5 


true, a false result (0) only if both expression are false 
e.g. 10 IF (A26 OR B$- "NO") THEN 90 
20 IF (HIT% OR B=6) THEN GOSUB 60 
NOTE: OR can also operate on numeric values (see p 15). 


: function 

: PEEK ( [address] ) 

: returns the contents, in decimal, of the byte named by [address]. 
In those sections of memory where there is a ROM/RAM overlay 
only the ROM atthat address will be PEEKed. To PEEK the RAM, 
the ROM must be switched out. 

e.g. 10 PRINT PEEK(53280) - displays the value of the screen 
border colour byte. 
20 PRINT PEEK(651) — displays the value of a counter 
controlling the time a key must be pressed before it repeats 
automatically 

: statement 

: POKE [address], [value] 

: puts [value] into the byte at [address]. [value] must be in the 
range 0 to 255. Unlike PEEK, which will return the contents of 
any address in memory, either ROM or RAM, POKE will only 
change the contents of RAM. If a value is POKEd into an 
area of memory where there is a ROM/RAM overlay, the 
RAM is automatically accessed, whether or not the ROM is 
switched out. 

e.g. POKE 65514,15 POKEs a value into the RAM under the 
KERNAL ROM. 
: function 
: POS ( [dummy]) 


the value of the dummy argument may be anything as it's not 
used. 


: returns the cursor's position in a line. Since a logical line may be 


up to 80 characters long, a value betweeen 0 and 80 тау be 
returned. 

If no cursor is being displayed, e.g. during a string manipulation in 
a program, the position of the character currently being handled is 
returned. Since a string of up to 255 characters may be built using 
concatenation, a value in the range 0—255 will be returned. 

e.g. PRINT “CURSOR AT”; POS(0) - displays "CURSOR AT 9" 
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РНІМТ 


: statement 

: PRINT [argument] 

PRINT [argument], [argument] ... 
PRINT [argument]; [argument] ... 

: displays the arguments listed after PRINT. If the arguments are 
separated by a comma, the Commodore 64 reserves 11 spaces 
for the arguments, so displays may be widely separated. If the 
arguments are separated by semi-colons, there is no separation 
between arguments. 

After each PRINT statement the cursor automatically moves to 
the next line. This can be stopped by finishing the PRINT 
Statement with a comma or semi—colon. 
String arguments to PRINT may contain special characters such 
as cursor control and colours. These characters appear in the 
string as reversed characters. (See Appendix C) Where the 
PRINT statement is executed, the special characters carry out 
their function. They are not displayed. 
"Programmable" cursor controls are CRSR t, САЗАН ! , САБА 
=, CRSR- , CLR, HOME, INST. Some Special characters need 
different treatment, however. For example, DEL and RETURN 
operate normally when an attempt is made to put either in a string, 
and quote marks will terminate the string. 
As you have probably found out, pressing DEL deletes a 
character but you might at some time want to program it into a 
string. The following steps show how to achieve this: 
1) Terminate the string with quotation marks. e.g. "STRING" 
2) Press DEL — this will delete the closing quotation marks but 
leave you out of quote mode. 
3) Press INST as many times as you want to insert a DEL, say 
twice. 
4) Now press DEL twice. These DELs will display as reversed 
characters and will not execute yet. 
5) Now putin replacement letters, if any, and complete the string 
with quote marks. 
All your keypresses should look something like this: 
“STRING” start with completed string 
press DEL to remove quotemark 
press INST twice to insert 2 DELs 
press DEL twice 
Add replacement letters, in this case FE 
close quotation marks 
The display should now look like this: 
e.g. 10 PRINT "STRING РЕ” 

and when executed will display "STRIFE" 
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When ИЗТеа the string looks as it displays, so editing can 
be difficult if you've forgotten what you've done. 

Other special characters can be put into strings in the 
following way: 

(i) Type the string, and RETURN key, leaving spaces for 
characters to be added later 

(ii) Use cursor control keys to get back to the space 

(ii) Press CTRL, RVSON 

(iv) Press the keys corresponding to the special character 
you want, as shown below: 


Character Type 
Shift Return SHIFT M 
Switch to lower case N 
Switch to upper case SHIFT N 
disable case switching keys H 


enable case switching keys | 


: The Shift Return character, like DEL executes when LISTed, so 
editing will again be difficult. 
A more general, easier to remember, and more obvious method of 
"programming" special characters is to use CHR$ and 
concatenation. 
Note: PRINT can be abreviated to "?" 
e.g. PRINT 50 
10 PRINT А$, 60; B 
20 ? “A STRING” ; 24 ; "LETTERS LONG" 
30 PRINT "LATEST PROGRAM" 
40 FOR Ј=0 TO 1000: NEXT 
50 ? "CRSR ғ CRSR ~ CRSR ~ CRSR ~ CRSR > 
"DEL INST INST DEL DEL" 
Lines 30—50 will display "LATEST PROGRAM", wait, and 
change it to "LAST PROGRAM". Line 50 will not look like 
this when you type it in. As written , it indicates the keys you 
press. 


PRINT# 


: statement 

: PRINT# [file—number], [variable list] 

- similar to PRINT, but sends the contents of the variable list to a 
device which has been previously OPENed. The variable list is 
transmitted in the same format as it would be PRINTed to the 
screen. If commas are used to separate variables, extra spaces 
are sent, if semi—colons are used, no spaces are transmitted. The 
commas and semi—colons are not themselves PRINT #ed. 

If no comma or semi— colon appears at the end of the variable list 
a CHR$(13) (RETURN) is sent. It is probably best to separate 
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READ 


variables with CHR$(13) on the file so that INPUTS can be used to 
read them back. 
e.g. 10 OPEN 1,1,1,"Data File" 
20 НТ% = CHR$(13) 
30 PRINT#1, LOW SCORE ;RTS$;LS;RT$; HIGH SCORE 
40 PRINT#1, AVERAGE ;RT$;A$ 
50 CLOSE 1 
OPENing the file clears the tape buffer ready for data. The 
buffer retains the data until it is cleared by a statement that 
does this as a part of its execution, like OPEN. Commas and 
semi—colons may also be used to separate variables on the 
file. these must be explicitly PRINT#ed as the RETURNS 
were in the example above. 


: statement 
: READ [variable list] 


variables in the list are separated by commas 


: reads data from DATA statements and assigns each data item to 


REM 


the next variable in the variable list. When there is no unread data 
in DATA statements and a READ is attempted, an "OUT OF 
DATA" error occurs and the program aborts. 
DATA statements are read in order of ascending line number. 
Within a DATA statement, data is read sequentially from left to 
right. The Commodore 64 increments a DATA pointer after each 
element is read. If а RESTORE statement is used, the DATA 
pointer is reset to point to the first data item of the first DATA 
statement. 
e.g. 20 READ A, C$, B, D$ 

60 DATA 6.4, HISCORE, 2.6, LOSCORE 

When new data items are assigned to a variable, the old 

value is lost. 

70 READ C$, C$ 

80 DATA HI, BYE | 

Final value of C$ is "BYE" 

90 FOR J=0 TO 5 

100 READ A(J) : NEXT 

110 DATA 1, 2, 3, 6,9 


: statement 

: REM[text] 

: no effect – REM statements are ignored by BASIC. They аге 
provided to enable programmers to include comments about 
the program. 
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RESTORE 
: statement 
: RESTORE 
: each time a READ is executed, the DATA pointer is 


e.g. 


e.g. 


RIGHTS 


RND 


e.g. 


If graphics characters аге used in a REM statement they 
must be preceded by quote marks, otherwise they will be 
interpreted as BASIC keywords. 

REM statements may appear as the last statement on a 
multiple statement line. If they are not last, any statements 
following them on the line will be ignored. 

20 REM 20- 160 CALCULATE GROSS WAGES 

150 GOTO 200 :REM BRANCH TO “HIT” SUBROUTINE 


advanced to point to the next DATA item. RESTORE resets 
the DATA pointer to the first data item of the first DATA 
statement. 

10 FOR J21 TO 5 

20 READ(AS) : NEXT 

30 RESTORE 

40 FOR Ј= 6 TO 12 

50 READ A$(J) : NEXT 

60 DATA A,B,C,D,E,F,G 


: function 
: RIGHTS ( [string variable, constant or expression], [number] ) 
: returns the string consisting of the rightmost [number] of 


characters of the original string. If [number] equals the length 
of the string, the entire string is returned. If [number] equals 
0, the null string is returned. 

10 ? RIGHTS("FRANTIC" , 5) – displays "ANTIC" 

20 ? RIGHTS(A$, LEN(A$) – 1) — displays all but the leftmost 
character of A$ 


: function 
: RND ( [number] ) 
: returns a pseudo-random number between 0 and 1 (not 


including 1), by performing calculations on a ‘seed’ value. If 
the argument is positive the same pseudo-random 
sequence is generated for a given seed. If the argument is 
negative, the function is re-seeded with each function call. If 
the argument is 0, a number is generated from the system 
clock. 

A seed is generated on power-up and stored in locations 
139-143. 
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e.g. 10 REM SUBROUTINE FOR RANDOM DICE THROW 
20 T1=RND(0) — get random number between 0 and 1 
30 T2=(T1*6)+1 — change to range 1 - 6.9999... 
40 THROW = INT(T2) — get integer value of throw 
This could, of course, be done on one line. 
20 THROW = INT(RND(0)*6) +1 
SAVE 
: Statement 
: SAVE 
SAVE ["filename"] 
SAVE ["filename"], [device] 
SAVE ["filename"],[device],[command] 
: Saves the program currently in memory onto cassette tape or 
diskette. 
If there are no arguments to SAVE, the program is saved to tape 
with no name. If the [ filename ] is given, the program is saved to 
tape under that name. 
[device] specifies tape (using code 1) or diskette (using code 8). 
[command] may be: 
1) - when loaded the program will go into the same part of 
memory it came from. 
2) - anend-of-tape marker will be written after the program. 
When the Commodore 64 reads this at a later date, it will act as 
though it has reached the end of the tape. If, for example, it is 
searching for a file which was written onto tape after the end-of- 
tape marker, it will stop and display a "DEVICE NOT PRESENT" 
message when it reads the EOT marker. 
3) - combination of 1 and 2. 
e.g. SAVE 
ЗАМЕ "GAME!1" — saves GAME1 оп tape 
SAVE G$ - saves on tape with the value of G$ as name 
SAVE "GAME?2",8 — saves "GAME?" on diskette 
SAVE "GAMES", 1,1 — saves оп tape — will reload into same 
part of memory. 
SAVE "GAME4",1,3 — saves оп tape — adds EOT marker — 
will reload into same part of memory. 
Usually used in immediate mode, but can be used in program mode. The 
program will continue normally after SAVEing. 


SGN 


: function 

: SGN ( [number] ) 

: if [number] less than 0 returns — 1 
if [number] equal to О returns 0 
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if [number] greater than 0 returns 1 
e.g. 20 IF SGN(X) = 1 THEN 60 
30 ON SGN(X)+2 GOSUB 100, 200, 300 


SIN 
: function 
: SIN ( [number] ) 
: returns the sine of the argument, which is in radians 
e.g. 20 ? SIN(1.5) — displays .997494987 
SPC 
: function 
: SPC ( [number] ) 
: prints [number] spaces on the screen. [number] must be between 
0 and 255. SPC can only used with PRINT. 
: 20 PRINT “LEFT” ; SPC (7) : "RIGHT" 
PRINT SPC (21) ; "!" 
SQR 
: function 
: SQR ( [number] ) 
: returns the square root of [number] , [number] must be greater 
than or equal to 0 
e.g. 10 PRINT SQR (4) - displays 2 
20 A = 64 
30 ? SQR (A) - displays 8 
40 ? SQR (А * A) - displays 64 
STATUS 
: function 
: STATUS or 
ST 


: returns a value corresponding to the state of the last input/output 
operation. Different bits of the status byte are set on different 
conditions, as shown below: 


CASSETTE 
— READ | 


TAPE VERIFY 
AND LOAD 


SERIAL BUS 

R/W 
time out write 
time out read 


short block short block 

long block long block 
unrecoverable any mismatch 
read error 

check sum error check sum error 
end of file 


—128 | end of tape device not present | end of tape 
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e.g. 10ОРЕМ1,1,0, "DATA" 
20 GET# 1, AS 
30 IF STATUS = 64 THEN 60 
40 PRINT А$ 
50 GOTO 20 
60 PRINT A$ : CLOSE 1 


NOTE: The status byte is located at 144. 


STOP 


: statement 
: STOP 
: halts а program and returns control to the user. The only 


STRS$ 


difference between STOP and END statements is that the STOP 
Statement produces the message “BREAK IN [line-number]". 
Thus, with more than one STOP in a program, you can be sure 
which one has been reached. As with the END statement, 
variables can be examined and changed and the program 
continued with CONT. 

e.g. 70 STOP - displays "BREAK IN 70" and halts. 


: function 
: STRS$ ( [numeric constant, variable or expression] ) 
: returns the string representation of the value of the argument. 


e.g. 10 ? STR$ (57.42) - displays "57.42" 
20 ? STR$ (-73) - displays " - 73" 
30 ? STR$ (2E + 2) - displays "200" 
40 ? STR$ (ЗЕ + 10) - displays “ЗЕ + 10" 
50 A = 67.24 
60 ? 5ТН% (A) - displays " 67.24" 


: Note that positive numbers have a leading space reserved for the 


SYS 


Sign so when STR$ed they are longer than they look. 
e.g. 70 ? LEN (STR$ (72)) - displays 3 


: statement 
: SYS [address] 
: in effect, performs a GOSUB to the machine language program 


starting at [address]. This is the most common way to mix BASIC 
and machine language programs. 
The VIC20 already has useful machine language routines (Kernal 
routines) which can be accessed via SYS. Also, users may POKE 
their own machine language routines into memory and access 
them with SYS. 
e.g. 20 SYS 65508 - gets character from keyboard buffer 

30 SYS 40800 - jumps to routine previously POKEd into 

memory at address 40800, and returns. 

NOTE: See machine language programming chapter 6. 
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ТАВ 


ТАМ 


ТІМЕ 


TIMES 


: function 
: TIMES or 


USR 


: function 
: TAB ( [numeric variable, constant or expression] ) 
: moves cursor to the position in a logical line given by the 


argument. If the cursor is already past that position on the current 
line, it is moved to that position on the next line. The leftmost 
position on the screen is О. The TAB argument must be in the 
range 0 — 255. TAB must be used with a PRINT statement. 

e.g. 20PRINT “NAME” ; TAB (8) ; ADDRESS" 


: function 
: TAN ( (numeric variable, constant or expression] ) 
: returns the tangent of the argument, which is in radians. 


e.g. 20PRINT TAN (1.642) 


: function 
: TIME or 


TI 


: returns the value of an internal clock which counts intervals of one 


sixtieth of a second (jiffies). This is initialized on start-up and reset 
to O after 51,839,999 increments. This may be useful for timing 
program segments. Note that it is turned off during tape 1/О. 
e.g. 20X = TI: GOSUB 600 

30 ET = (TI — Х)/60 

40 ? “subroutine 600 took”; 

50 ? ET ; "seconds to execute" 


TIS 


: returns a 6 character string indicating hours, minutes, seconds — 


i.e. "HH MM SS" — on a 24 hour clock. The correct time must be 
initialized by the user. It is lost when the Commodore 64 is turned 
off, and will not be accurate after tape I/O. 

e.g. 20TI$ = "131500" — initialize to 1.15 pm. 


3OIF Т$ = > "131559" THEN 30 
40 ? "WAKE UP" 

: function 

: USR ( [arg]) 


: calls a user written machine language subroutine, whose starting 


address is stored at memory addresses 785 and 786 (low byte in 
785, high byte in 786). To calculate the POKE values for each 
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address byte, find the address іп Hex and convert each byte to 
decimal. The [arg] is initially stored in the floating point 
accumulator (memory locations 97 — 102), and the result 
returned is the final value stored in the accumulator. 
e.g. 20 POKE 785, 0 : POKE 786; 144 — poke start address 
(9000 Hex = 36864 decimal) 
30 A = USR (3) — call subroutine, assign result to A 


VAL 


: function 
: VAL ( [string constant, variable or expression] ) 
: returns the numerical value of the string argument. If the string 
does not start with --, —, . or a digit, the function returns 0 
e.g. 201INPUT "PRICE"; АФ 
30 PR = VAL (A$) 
40 IF PR = 0 THEN PRINT "NUMBER EXPECTED" : 
GOTO 20 
50 ? VAL ("73.2") — displays 73.2 
60 ? VAL ("7" + "3" + “." + "2") — displays 73.2 
70 ? VAL (STR$ (73.2)) — displays 0, since STR$ returns 
"[space] 73.2" 
80 ? VAL (MIDS (STR$ (73.2) , 2)) — displays 73.2 


VERIFY 


: statement 

: VERIFY 
VERIFY ["filename"] 

VERIFY ["filename"] , [device] 

: checks the program on tape or diskette against the program 
currently in memory, and displays the message "VERIFY 
ERROR" if they don't match. This is used to ensure that a program 
has been SAVEd properly. Make a habit of VERIFYing 
immediately after SAVEing. 

When there are no arguments in VERIFY, it checks the next 
program it finds on tape. When ["Мепате"] appears as argument, 
the program of that name is searched for on tape and VERIFYd, if 
found. 
[device] is used to VERIFY a program saved on diskette. As usual 
[device] is 8 for the disk drive, 1 for cassette (default). 
e.g. VERIFY — checks next program on tape 
VERIFY "MYPROG" — searches for "MYPROG" on tape 
and VERIF Ys it, if found. 
VERIFY "НЕНРНОС", 8 — searches for HERPROG" on 
diskette, and VERIFYs it, if found. 

: Don't forget to rewind the tape after SAVEing so that the relevant 

program can be found. 
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WAIT 


: statement 

: WAIT [address] , [mask1] 
WAIT [address] , [mask1] , [mask2] 

: causes the program to wait until the value in [address] changes in 
a way specified Бу [mask1] and [mask2]. 
The value in [address] is bitwise ANDed with the value in [mask1]. 
If there is а [mask?2], the result of the AND is exclusively ORed with 
the value іп [mask2]. 
Exclusive OR is different to the OR met previously, which is 
included. Exclusive OR (XOR) only produces a true result when 
only 1 of its arguments is true, a false result otherwise. 
ie. 1X0R1=0— false 

1 XOR 0 = 1— true 
О XOR 1 = 1— true 
0 XOR 0 = 0— false 

: If the result of the AND and ХОН is 0, WAIT continues to wait. If the 
result is not 0, execution proceeds normally from the statement 
following the WAIT. This statement is generally used to monitor 
|/O activities. A novice programmer is unlikely to need it. 
e.g. 20 WAIT 160, 144, 128 (160 is 1 byte of the 3-byte jiffie clock 

which is continually changing its values. ) 

: This will cause the program to wait until bit 8 of 160 is off (0) or bit 5 

is on (1) or both. 
(See page 16 for more on bit, bytes and masks.) 
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СНАРТЕН 3 


Compressing BASIC Programs 


It may sometimes be desirable to compress programs. The following is a 
list of methods you can use to do this 


Abbreviating Keywords 


Most BASIC keywords can be abbreviated as shown in the table on 
pages 43, 44. Using these does not directly save memory, since 
keywords are stored as tokens, not the actual word. However, it means 
that it is possible to put more information on a line, thus reducing the 
number of line-numbers, which do use extra memory. It also cuts typing 
time. Abbreviations are expanded to the full word when LISTed. 


Multiple statement lines. 


These help minimize the number of line-numbers needed. The only 
limitation is that a multiple statement line should not exceed 80 
characters, including colons and RETURN. 


Variables. 
Keep variable names short. 


When a number, word or string is used often in a program, it should be 
assigned as the value of a variable, which can then be used in its place. 
e.g. 10A = 36874 
20 POKE A,13 : POKE A,72 : POKE A,16 
This has the added advantage of enabling you to squeeze more on a line, 
and, again, cuts typing time. 


READ, DATA statement 
When a repetitive task, such as defining your own character set, needs to 
be done, it is more memory efficient to use DATA statements to hold the 
values together with a READ statement in a loop, than to write all the 
individual repetitions. 
e.g. 10 FORJ = 0 TO 63 

20 READ A,V : POKE A,V : NEXT 

30 DATA 12288, 0, 12289, 48, 12290, 128... 

40 DATA ... 
rather than 

10 POKE 12288,0 : POKE 12289,48 : POKE 12290,128 


70... POKE 12351,0 
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Arrays 


These can be used for the same purpose as DATA statements. Where 
possible, use integer arrays rather than floating point arrays, since 
elements use 2 bytes compared with 5 for floating point elements. 


Spaces 

The BASIC interpreter does not need spaces in programs, but if used 
they are stored. Eliminating them therefore saves memory. It also makes 
programs difficult to read, so this is best done after all debugging. 


GOSUB 


Using subroutines obviously saves memory, since it saves writing the 
same section of code several times. You should note however, that 
GOSUBs can be fairly slow, since it must stack and retrieve addresses. 


TAB, SPC 


These two functions may be more economical than a string of cursor 
control commands to position a character on the screen. 


REM statements 


These may be removed entirely once the program is debugged and read 
for use. This isn't a great idea, since you may have to examine or change 
the program at a later date, but it does save space. 


Overlays 


This involves breaking programs up into sections which are loaded in 
sequence. For example, many games programs involve defining a new 
character set. Instead of having 1 program which both defines the 
character set and runs the game, 2 programs can be written. The first 
defines the character set and then LOADs the second program, which 
runs the game, on top of it. Many programs have such initialization tasks 
to do, and overlays can be useful in these cases - arrays and variables 
can be defined and given values by one program and used by another. 
However, a limitation is that the second program must be shorter than the 
first program otherwise it will overwrite the variable values. 


Abbreviations for BASIC keywords 


Command Command Abbreviation 
ABS | А SHIFTB ОРЕМ О SHIFTP 
АМО А SHIFTN РЕЕК P SHIFTE 
ASC A SHIFTS POKE P SHIFTO 
ATN A SHIFTT PRINT ? 

CHR$ C SHIFTC PRINT s P SHIFTR 
CLOSE CL SHIFTO | READ R SHIFTE 
CLR C SHIFTL RESTORE RE SHIFTS 
CMD C SHIFTM RETURN RE SHIFTT 
CONT C SHIFTO RIGHTS R SHIFT! 
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DATA D SHIFTA |RND В SHIFTN 
DEF D. SHIFTE | RUN R SHIFTU 
DIM D SHIFT! SAVE S SHIFTA 
END Е SHIFTN |SGN S SHIFTG 
EXP E SHIFTX  |SIN | S SHIFTI 

FOR Е SHIFTO |SPC( | S SHIFTP 
FRE ГЕ SHIFTR |SQR | S SHIFTQ 
GET С SHIFTE |5ТЕР ST SHIFTE 
GOSUB GO SHIFTS |STOP S SHIFTT 
GOTO G SHIFTO |STR$ ST SHIFTR 
INPUT# | SHIFTN SYS SHIFT Y 
LET | SHIFTE  |TAB( T SHIFTA 
|ЕЕТФ LE SHIFTF |ТНЕМ T SHIFTH 
LIST L SHIFT! USR U SHIFTS 
LOAD L SHIFTO |VAL V SHIFTA 
MID$ | M SHIFTI | VERIFY V SHIFTE 
NEXT N SHIFTE  |WAIT W SHIFTA 
NOT N SHIFTO 


* Take care not to put in another left parenthesis. 


Appending BASIC programs 

So far, whenever you have loaded a BASIC program it has overwritten 
the program in memory. However, because the Commodore 64 relies on 
pointers to tell it where the start of program memory is, it is possible to 
load in a program and join it to the program already in memory. 


The start of program memory pointer resides at locations 43 and 44. 
Type PRINT PEEK(43), PEEK(44) in direct mode. The normal values are 
1 and 8. To change the pointer to point to the end of the program 
currently in memory, type: 

РОКЕ 43, PEEK(45) – 2 : РОКЕ 44, PEEK(46) 


Now the next program to be loaded will start at the end of the first 
program. To make the Commodore 64 see both programs as one, reset 
the pointer to the original value using 

POKE 43,1 : POKE 44,8 


The only restriction to this technique is that the second program to be 
loaded must have higher line numbers than the program already in 
memory. 


This technique will enable you to save common subroutines 
independently and add them to programs when needed. 
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BASIC program storage format 


Program lines are sorted from the start of the BASIC user area in order of 
ascending line numbers. Variable storage starts from the end of the 
program . Array storage starts from the end of variable storage. String 
storage starts at the top end of available user memory and works down 
towards the end of array storage. 

The following pointers are used to keep track of storage. 


| Pointer Aadress, | С Ue | Defaut | 


m р 


43,44 


Start of BASIC area 2048 | 


! | 
| 45,46 | Start of BASIC variables | — | 
| 47,48 | Start of arrays | — | 
| 49,50 | End of arrays | — 
| 53,54 | Endofstrings | — | 
| 51,52 | Start of strings · 40960 ; 
| 55,56 ‚ Highest address 40960 
,  usedby | 
| ' ВАЅІС | 
| 65,66 : Current DATA item | - | 
! | 


are tokenized - converted into a one byte code. Each line is then stored in 
the following format. 

Link Address | Line-n. — . |BASICTEXT | End-of-line_ 
Lo-byte Hi-byte ! Lo-byte Hi-byte | | 0 


The link address points to the start of the next line. The line number is a 
2-byte binary number from 1 to 63999. Line numbers in the BASIC text 
(as arguments of GOTO, GOSUB) are stored in ASCII format - 1 byte per 
digit. The end of the line is indicated by a 0 byte. The end of the program 
is indicated by a 00 link address. 


Worry-free overlays and the keyboard buffer 


When overlays were previously mentioned, one of the restrictions was 
that the overlay had to be shorter than the program it was loaded over. 
Using the keyboard buffer bypasses this restriction, and makes the use 
of overlays tidier. The program lines below should be added to the end of 
a program to be overlaid. 
60000 POKE 631, 78: POKE 632, 69 : POKE 633, 87 : POKE 634 
‚ 13: POKE 635 , 76 : POKE 636, 111 : POKE 637 , 13 
60001 POKE 638, 82 : POKE 639, 117 : POKE 640, 13: POKE 
198,10 
These lines РОКЕ into the buffer the abbreviations for the commands 
NEW, LOAD and RUN, each followed by a RETURN. Thus the old 
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program is cleared out, the overlay loaded in and run, all without the user 
having to do anything and without the programmer having to worry about 
the size of the overlay. 


Commodore 64 BASIC Keyword Codes 


Character/ Code Character/ Code Character/ Code 
Keyword (decimal) Keyword (decimal) Keyword (decimal) 


end-of-line 0 POKE 151 178 
unused 1-31 PRINT# 152 | 179 
same as i 
СНН% 32-95 PRINT 153 P SGN 180 
codes CONT 154 INT 181 
unused 96-127 LIST 155 ABS 182 
END 128 CLR 156 USR 183 
FOR 129 CMD 157 FRE 184 
NEXT 130 SYS | 158 POS 185 
DATA 131 OPEN | 159 SQR 186 
INPUT# 132 CLOSE | 160 RND 187 
INPUT 133 GET | 161 LOG 188 
DIM 134 NEW 162 EXP 189 
READ 135 TAB( | 163 COS 190 
LET 136 TO | 164 SIN 191 
GOTO 137 FN 165 TAN 192 
RUN 138 SPC( 166 ATN 193 
IF 139 THEN 167 PEEK 194 
RESTORE 140 NOT 168 LEN 195 
GOSUB 141 STEP | 169 STR$ 196 
RETURN 142 4 170 VAL 197 
REM 143 - 171 ASC 198 
STOP 144 * 172 СНА 199 
ОМ 145 / 175 (ЕРТФ 200 
WAIT 146 | 174 RIGHTS 201 
LOAD 147 AND 175 MIDS 202 
SAVE 148 OR 176 unused | 203-254 
VERIFY 149 177 255 
DEF 150 


Codes are interpreted according to this table except when characters are 
іп a string, when CHR$ codes apply. Arithmetic and relational operators 
are interpreted as keywords unless they appear in a string. 
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Clearing the keyboard buffer. 
If you are using PEEK (197) to find the current keystroke, the keyboard 
buffer will fill up. Thus, the next time the Commodore 64 looks at the 
keyboard buffer it will find either meaningless or misleading data. This 
can, under certain circumstances, cause problems. You should 
therefore be aware that you can clear the keyboard buffer when 
necessary. 
The buffer is located at addresses 631-340. 
The number of characters currently in the buffer is held at address 198. 
The simplest way to clear the buffer is to РОКЕ 0 into 198. 
ie. POKE 198,0 
The keyboard buffer can also be used in a more positive fashion. 
Program lines can be added and changed from within a program. For 
example, the following program allows the user to input functions, have 
them defined using DEF FN and then have them evaluated. 
This program is a self-modifying program, creating a new line 100 each 
time a new function (X$) is entered. 
= БҒМ «44 DEFINING РОМСТТОМЕ жж 
10 FRINT"EMTER FUNCTION OF X" 
PA INPUT ЯФ 
an РОКЕ 1986,3: POKEG31,19: POKE632 ‚ 13: POKEGS3 , 13 
40 PRINT" Eat QONEFFNAC X= "ХЕ" КЕТМЕМ" 
га PRIMT"QGOTO GO":SYS 42115:РЕМ 42115 IS BASIC 
WARM START ROUTINE 
60 GOSUB 198 
70 INPUT "RENTER Х"КЕРВІМТ "ЕМ Хә = "ЕЧЕСК?: 
GOTO 78 
Explanation 


Line 30 : sets the number of characters in the buffer and puts two 
returns in there. 

Line 40 : prints line 100, substituting the input function for Х%. 

Line 50 : prints GOTO 60, homes the cursor and ends the program. 

With the program over, the characters in the keyboard buffer are 

executed. The first return enters line 100 into the program. The second 

causes the immediate command GOTO 60 to be executed, thus re- 

entering the program. 

Line 60 : causes the function to be defined. 

Line 70 : evaluates the function at points input by the user. 


Window Listing 

The same technique can be used to create a program which will list 
programs one line at a time and allow the user to move forwards and 
backwards through the listing. Mistakes must be noted and corrected 
after exiting from this program. 

To use it, append it to the program to be listed, as described іп the section 
on appending BASIC programs, and type RUN 60000 
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68008800 5Я=РЕЕК‹ 44 ) ж256+РЕЕК( 43) -1:Р1.=5А 

евсайо LN=PEEK( SA+39 +РЕЕК‹ SA+4) x256 

веваз PRINT",I3GOTOG0010":PRINT"LIST";LN 

20204 POKE631,19:POKE632,17:POKE633,134:POKE634, 
13:POKEG35,19:POKE636,13:POKE198,6:END 

Е8010 IF РЕЕКС 1872-40 THEN 60100:REM TEST "+" 


60020 IF PEEK( 1972-43 THEN 6@200:REM TEST "-" 


60930 GOTO E0010 

60100 REM "+"ACTION 

20185 TEZCPEEKCSR*12 4PEEKCSR 422 ж256 ) – 1 

68110 IF (PEEKCTE*12 *PEEKC ТЕ+2 25620420 THEN 
SA=TE 

тїт т GOTO &0002 

GOZOA REM "-" KEY ACTION 

Ей210 IF SA=FL THEN едадг 

50220 за=ва-1:1Е PEEK бА) =р AND (SA-42<>0 AND 
PEEK( 58-325 20 THEN 60002 

64230 GOTO 60210 


Before reSAVEing the program reviewed, lines 60000-60230 should be 
deleted to avoid saving the program above as well. 
Autonumber 


The following program also uses the keyboard buffer in a similar manner. 
In this case to provide automatic numbering of BASIC program lines. 
Type RUN 60000 to run it. 


60000 POKESE,159:POKE52,159:CLR 

EDIR INFUT"START":SA 

БОВЕ HS=INTC SA/25E ) tLS=SA-HS*e5E 

66030 INPUT" INCREMENT"? IN: PR INT "4" 

60040 HI=INTC 14/256 > :1,1=14-Н1ж256 

6800530 POKE40705,LS:POKE40706,HS:POKE40707 ,L I: 
РОКЕ40708 „НІ 

EROSO за=РЕЕКС 40706) ж256+РЕЕК( 40705) : INZPEEK 
(40708 > ж256 +РЕЕК‹ 40707) 

60070 РВІМТ"О"ЅА; "H INEI ; : SG SR + IN: POKE 
40706, INTC SA/256 › 

60075 POKE40705,(SA-INTC SA/256> x256) 

E2077 POKE204,0 

E0080 GET K$:1F Қ%-"" THEN 60080 


60080 POKEBO7,0:PRINTK$;:POKE207,2855:1F КФ › 
CHR$C 132 THEN 60080 
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28188 РОКЕ6З1,‚,145:РОКЕЄЗ2,1З:РОКЕЄЗЗ,71:РОКЕб6БЗ4, 
111:РОКЕ6З5,54:РОКЕ6З6,48 

60110 РОКЕ6З?7,48:РОКЕ6З8,54:РОКЕБЗ89,48:РОКЕБ4О, 
3:РОКЕ188,10:5Ү542115 


Before saving the program written, lines 60000-60100 should be deleted 
to avoid saving the program above as well. 


Machine Language merge program 

Merge program for a Commodore 64. The machine code routine is totally 
relocatable. If you wish to locate the routine at an address other than 
40706, then lines 10 and 20 should be changed. 


POKE SS ,Q8:POKER6, 159:CLR 
=2408785 РОВ 1=5 ТО =+72:КВЕВАО YV 
С=С +0: РОКЕ 2,У:МЕЯТ 
IFC 3587 SG THENFERIPMT"DATAS ERRIR" SEND 
пате J69,0,125,10,32,212,225,165 
рата 43 72,1Е5,44,72, 56,125,45 
Сат E ,7,192,43,1855,46,2232, 
MATA 1: 2,44, 1Е2,4,133,185,166,43 
гата 164,44,169,0,32,213,255 
PATA 13,13234,545,132,42,32 ,5' 
PATE 1€4,122,44,104,133,42, 
пата г201,4,144,044 ,р4а0,10,16 
пата 44,104,132,43,04, 108.0, 
пата 164,156, 175Е 240,209 ,20:‹ 
ME l4! 


э} км. кә pob шм "2 е. га V ЈУ ti) МОЈ t 
а VD) DN DAI bA 50 3 OO 3 73 
ооо 


Л 
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Using Merge 

If the computer has just been turned on and you intend to merge two or 
more programs, then use Method A. If you already have a program in 
memory and you needto merge in another program, then use Method B. 


When using the following method, remember to load in the program with 
the lowest line numbers first. 


Method A: 

1. Type in Merge (or load merge if it has already been typed in and 
saved) 

2. Save Merge (if not already saved) 

3. Run Merge 
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4. Loadin first program 
5. Type SYS 40705 "second program", device number 
6. Repeat ‘5’ for any other programs to be merged 


Method B: 

1. Saveandverify the program currently residing in memory 
2. TypeNEW 

3. Now use Method A 


Block delete 


When a large block of line numbers are to be deleted; using the method 
of entering the line number and hitting the RETURN key for each line can 
be time consuming and dangerous. The following routine once MERGEd 
can be executed by typing RUN 60000. The prompt "FROM, TO, STEP" 
will be displayed. Answer the prompt with the first and last line of the 


block to be deleted and the step-size between each line. (Use step-size 1 
to delete ail lines of block.) 


60000 REM ж BLOCK DELETE ж (ROUTINE) 

80010 INPUT"FROM,TO,STEP";F,T,S: PRINTCHRs 147) 
60820 PRINTCHRS 19)Е:Е=Е+5:РКІМТ "60040 Е="Е": 
T2"T":S-2"S:PRINT"GOTOG0040 " 

60930 POKE 631,19:PDKEG32,13:POKEE33, 13:POKE 
624,13:РОКЕ 188,4:END 

60040 F- 40 :T- 30 :5= 12 

50050 IF F>T THEN PRINTCHR£ 1472 : END 

60050 GOTO 50022 


СНАРТЕН 4 


SOUND 


THE 6581 SOUND INTERFACE DEVICE (SID) 


The Commodore 64 uses a very powerful sound chip called the 6581. 
The sound chip has many powerful features each of which will be 
discussed in detail throughout this chapter. Each of the sound chip's 
registers (special memory locations within the chip) have been memory 
mapped to the Commodore's memory. A detailed memory map of these 
locations can be found at the end of this chapter. 


WAVEFORMS 


The tonal quality of a sound is determined by its waveform. Sound is 
made up of vibrations and the shape of each vibration determines the 
sound's waveform (the frequency of vibration determines the pitch.) The 
perfect vibration is a sine wave. The smooth rise and fall of a sine wave 
characterizes the smoothness of the sound produced by a sine wave. 
The same applies to other waveforms. The following waveforms are 
those used on the 6581 sound chip; their sound varies depending on the 
rising and falling of their output volume controlled by the wave envelope 
discussed later in the chapter. 


TRIANGLE: 
ААА 


A very hollow or mellow sound, capable of producing the sound of ап 
xylophone, chimes, flute and similar sounds. 


SAWTOOTH: 


им 


А very twangy, brassy sound, capable of producing the sound of a 
harpsicord, trumpet and similar sounds. 


PULSE: 


A hollow to reedy sound, depending on the pulse width set (gap between 
each square wave), capable of producing a range of sounds from the 
piano to the clarinet. 
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NOISE: 


Іш қ, 


Noise, strangely enough, is a very versatile waveform used for producing 
Sounds such as hissing, wind, the sea, gunshots, footsteps, clapping, a 
roaring crowd, etc. 


THE ADSR ENVELOPE 

The ADSR wave envelope is a device that gives us control over the rise 
and fall of the volume during sound output. ADSR stands for Attack/ 
Decay/Sustain/Release.These are the four volume components of the 
envelope. The first stage of the ADSR envelope is the attack stage. The 
attack is actually the rate at which the volume is brought from zero level to 
peak volume. The peak (maximum) volume must be set before the 
envelope is used. A zero attack would give use an instantaneous output 
beginning at peak volume. A maximum attack setting (8 seconds of the 
658175 envelope) would begin with zero volume and slowly increase 
volume until it reaches peak volume. 


This brings us to the DECAY stage of the envelope. As soon as the 
volume reaches peak volume, the volume begins to decay (drop down) 
to the sustain volume at the set decay rate. As with the peak volume, the 
sustain level must be preset. The sustain level can be set to anywhere 
between 0 and peak volume.Once the volume has decayed down to the 
sustain level, the volume will stay at this level until a release signal is 
sent. On the 6581 a release signal is sent by setting the GATE bit to zero 
(see sound chip register map at the end of this chapter). 


The release is just a secondary decay that decays the volume from the 
sustain level to zero volume at a rate determined by the decay rate 
setting. 


< Attack time _,,_ бесау.,---- Sustain .____. , Release _, 

E e 22“. dme : duration ‚ time | 

И Ее | | 

Ж о E E ( | 

Peak 1 B | 

x volume Sustain volume ! 

7 ^ ! i а ! 

Pd | <. : 

22 whe Ж a КЕТЕ ME SE + 8.97 алушы қа > time 


With the general envelope, we can choose one of the four preset 
waveforms. 
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7 іш 


and we сап choose different frequencies (spacing between wave 
oscillations): 


You can see that by using different combinations of waveforms and wave 
envelopes, it is possible to generate a large variety of sounds. 


THE ADSR ENVELOPE 

Summarizing the terms used to discuss the ADSR envelope. 

ADSR Attack/Decay/Sustain/Release envelope 

ENVELOPE Shape of the volume of a sound over time 

Attack Rate at which a sound reaches peak volume 

Decay Rate at which a sound falls from peak volume to 
sustain volume 

Sustain The proportion of the peak volume that the volume will 
DECAY to 

Release Rate at which a sound falls from sustain volume to zero 
volume 


Without the use of a wave envelope, it would be impossible to reproduce 
the sound of most of the existing musical instuments and the ability to 
produce complex sounds would be limited. 


For example, in order to reproduce the sound of a violin you need the 
sound to build slowly, reach a peak then drop to a lower level and sustain, 
ie. for as long as desired after which the volume is allowed to slowly die 
away. This is similar to the ADSR envelope in the previous diagram. A 
table of the possible attack, decay and release times is as follows: 


0 
1 
2 
3 
4 
5 
6 
7 
8 
9 
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___Маџе | Attackrate | Value | Decay/Releaserate | 


160 500 т< 10 1.55 
176 800 ms 11 2.45 
192 is 12 3s 
208 3s 13 9s 
224 5s 14 15s 
240 8s 15 24s 


Later we will show how to use these values to control the ADSR envelope 
from a BASIC program. 


CONTROLLING THE SOUND CHIP 


Now that we know theoretically how to shape a sound to produce the 
sound we want, we сап use the 6581 sound chip to put our knowledge 
into practice. The sound chip is controlled by changing values inside the 
Sound chip's internal registers (memory cells within the sound chip). In 
order to control the sound chip via the computer, the sound chip registers 
have been memory mapped to the Commodore 64's memory. The 
memory used are locations 54272 to 54300. The sound chip is 
continually copying the values stored in the first 25 locations to the first 25 
of its own respective registers. Thus, changing the contents of any of the 
locations 54272 to 54296 will have a direct effect on the operation of the 
Sound chip. These memory locations are write-only, therefore no 
information can be obtained by reading them. Refer to the sound chip 
register map at the end of the chapter to see the significance of each 
sound chip register. 


The first set of 7 registers make up the first sound channel or voice. There 
are three voices altogether, each as a whole, having the ability to 
generate a single sound. Each voice has frequency control, a choice of 
the four waveforms (previously discussed), an ADSR wave envelope 
and the ability to control the pulse width of the pulses. Other registers are 
used for filtering and peak-volume control. Finally, the last four registers 
are read-only registers used to store output from paddles, voice 3's 
waveform and voice 3's envelope. 


PLAYING TUNES 


The most practical way of writing a BASIC program to play a tune is to 
Store the tune as data. For simple tunes, only two items of data are 
needed; the note frequency and the duration of each note to be played. 
The following steps are necessary when writing a BASIC program to play 
a simple tune. 

1. Simplify the addressing of all sound register memory locations to be 
used by assigning a variable name to each location. 

2. Clearthe sound chip by setting all the sound chip registers to zero. 
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З. POKE the attack/decay registers and the sustain/release registers 


with the attack, decay, release values chosen from the table in the 
envelope setting. 


4. Loadthe volume register with the maximum volume (ie. 15) 

5. Setupaprogram loop that does the following: 

Read the frequency of the next note and the duration of the note. If there 
are no more frequencies then end. Otherwise, load the frequency 
registers with their data. Turn on the waveform and the GATE bit (see 
register map). Use a FOR NEXT loop to loop for the duration. Turn off the 
gate bit. Use a FOR NEXT loop to create a suitable pause (say 50 
counts). Go back and do it again. 

6. Usethe note table at the end of this chapter and durations using 1000 
as an approximation of about 1 sec. 

7. Enddata with three negative values to signal end-of-tune. 

Your program should look similar to the following: 


5 REM ж TUNE ж 

18 СНІР=54272 : C=CHIP 

20 NLCO»2sC*O:NHCODZCA1:0K 02 =С+а t DC BD 2C 45: SRC 8 > 
=С +6 : VOLUME =C +24 

29 FOR REGsCHIPTOCHIP*24:POKEREG , 8 : NEXT 

48 POKE ADC@),64+9 : POKE SRCOD,84040 

50 POKE VOLUME ‚15 

ва READ F,DUR : IF F«0 THEN POKE LK 02,0:END 

65 DUR=DUR#29 

ТӨ NHC12SINTCF/256 2 : NLC 12 2F -NHC 12:856: POKENHCOD, 
NHC 12: POKENL( 02 , NLC 12 

80 POKE WK @),22+1:REM ADO 1 FOR GATE 

99 FOR COUNT=1 TO DUR :NEXT COUNT 

100 РОКЕ К> ,32:ВЕМ TURN OFF GATE 

110 FOR РАМБЕ-! ТО 50 :NEXT 

128 GOTO ва 

2:0 рата 4820,8,6420,8,6428,12,6068,4,6420,8, 
9100,8,8100,8,7220,8,9837,8 

220 DATA 8637,8,8637,12,8581,4,8100,8,7220,8, 

8100,16,49820,8,6420,8,8420,12 
220 DATA 6068,4,6420,98,8100,8,8100,58,7229,8, 
8637,8,7РР0,8,7220,12,6068,4 

340 DATA 6968,8 ,5396,8,4820,16 

399 DATA -1,-1,-1 

READY. 

USING MULTIPLE VOICES 


When using multiple voices you have the power to do many things not 
possible with a single voice. Some examples are orchestration, 
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harmonization, special effects such as echo and other combinational 
sound effects. 


In gaining these additional sound effects, it is necessary to include the 
programming complexity of timing. There are many methods in which to 
accomplish multiple voice programming, though the most effective 
method used so far is a method called the interpretive method. The 
simplified version of the interpretive method used here is as follows: 


1. Simplify register addressing 
2. Foreach voice: 
Read note values and the duration of each note into arrays where a 
duration of 1 isa 1/16 beat and a zero for the high frequency signifies that 
the duration is a rest. 
(The data may be a translation of a three-piece tune taken from sheet 
music.) If high is negative then store data count as end of tune for this 
voice. 
3. Clear sound chip, set up ADSR values, waveforms for each voice 
and volume to 15, POKE in all values accept the waveform. 
4. Initialize the note count array for each voice to zero. 
5. The main loop should contain: 
a) Cyclethrough each voice (1 — 3) 
b) Test if duration of note for this voice has exhausted (і.е., less 
than 0) in which case increment the note counter and turn off the 
waveform. 
C) Inserta short pause to signify a breack between notes 
d) lIfhigh frequency > Othenturnon wave 
e) Loadhigh and low note values into their registers. 
f) Decrement duration of note 
g) If end of tune for this voice then add one to end of tune counter 
h) ЊЕ = 3 then END 
i) Next voice 
j) Re-execute main loop 
5 REM жжж TUNES WITH MULTIPLE VOICES xxx 
19 CHIP=54272 : MAX=100 
eo DIM FC132,HCS3, MAR)? ,LCS3,MAX» ,DC3,MAX2 ,UC3,12 
38 FORV-1TOS3 
49 CsCHIP4CV-12x7? 
50 NLOVOSC*O:NHCVOsC*1:0K( У „а > =0+4 
60 NEXT V 
55 FOR К=0 TO 13 : READ ЕСК) : NEXT 
278 VOLUME =СН1Р +24 
ад FOR K=CHIPTOCHIP+24:POKEK, 
S0 READ D:POKE K,D0:NEXT 
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FORV-1TO3 : READ МСМ,1) 

МЕ МУ) =A 

READ N$,DCOV,N2O: ЈЕ NS="*" THEN ЕСУ>2-М:080Т70 
160 

IF №="-" THEN HCGCV,N2z0:GOTO 150 

OC=VALC RIGHTES МЕ, 1) ) 

Е-Ғ( САСССІЕҒТФ( МЕ, 199-65) +С LENC МЕ) -2 2 Ж7) 
+210С+0С 

НОУ ,NOEINTCF/2569°L0V,N) =F -HC'V ‚М> жа 56 
МЧМ-М%1:60Т0 130 

МЕХТ У 


POKE VOLUME ,7 

FOR V-1TQ3 

DCV,NCICV22-DXCV,NCV2»5-1 

IF ОСУ, МСМ < 1ТНЕММС У 2 zNCV2O*1: POKELDK V,0» 
sWOV, LOAND25S4:GOTO 280 

HzHCV,NCV5»o :LZLCV,NCV»D 

IF НОД THEN POKE МСУ,02,АСУ,19 

POKE WHC У>,Н:РОКЕ NLCV),L 

IF МУ? =E VO THENE-E*1:POKELKC V,0»5,0: IF 
Е=ЗТНЕМ END 

NEST У 

GOTO 210 

REM NOTE-TABLE DATA 

DATA 451,506,268 ,301,337,358,401,477,8,2849 
,318,0,378,425 

REM SET-UP DATA CEDIT FOR FILTERS ETC.) 
DATA 0,0,0,8,0,24,250 

DATA 0,0,0,8,0,16,250 

DATA 0,0,0,8,0,0,250 

DATA 0,9,0,0 


1008 DATA 65 

1010 рата D4,4,64,4,64,6,FH4,2 
1020 DATA 69,4,84,4,84,4,84,4 

1928 DATA 05,4,05,4,05,6,C5,2 

1040 DATA B4,4,A94,4,B4,8 

1050 DATA 04,4,64,4,64,6,РН4,2 
1060 DATA 64,4 ,В4,4 ,В4,4,А4 ,4 

јата рата D35,4,h4,4,84,6,FH4,2 
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1080 DATA FH4,3,E4,4,D4,8 

1838 DATA «,а 

1989 : 

2006 DATA 33 

2812 пата D4,4,D43,4,D4,6,D4,2 
2620 пата Dd,.,4,G4,.,4,G4,4,FH4,4 
заза рата 64,4,ҒЕ84,4,Е4,4,84,4 
204A DATA G4,4,F484,4,G4,8 

газа DATA 04,4,04,4,04,6,04,2 
2068 DATA E4,4,64,4,G4,8 

20те NATA ғ#4,4 ,Е4,4 ,Ғ#4,6 ,04,2 
2098 рата D4,4,CH4,4,D4,3 

саз: пата *,f 

Z999 : 

запа рата 17 

201A рата E3,4,B3,4,B3,86,R3,8 
3080 DATA вз,4,04,4,04,8 

2030 NATA D4,4,U4,4,C4,4,E4,4 
зада DATA 04,4,04,4,04,8 

зӣ DATA R3,4,B3,4,B3,6,R3,8 
EA DATA E3,4,D4,4,CH4,8 

га DATA П4,4,Е4,4,04,6,Аз,2 
ЗВ рата B3,4,Gz,4,FH2,8 

= DATA *,8 


USING FILTERS AND RESONANCE 


With the use of the 6581 sound filters and resonance, it is possible to 
generate exactly the sound you want by finding the appropriate basic 
waveform. Firstly, the three types of filters are Lowpass, Highpass and 
Bypass. There is a filter switch for each voice therefore giving you a 
choice of which voice(s) you wish to have filtered. There is also a filter 
switch for external sound input so that any sound device plugged into the 
audio/video socket will be filtered in the same way as sounds generated 
by the 6581. 


t0 


HIGHPASS FILTER 

The highpass filter will pass all frequencies at or above the cutoff 

frequency while attenuating the frequencies below the cutoff frequency. 
(Volume), .— .— — without filtration 


Peak | with filtration 


еттті (Frequency) 
uto 
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LOWPASS FILTER 


The lowpass filter will pass all frequencies at or below the cutoff 
frequency while attenuating the frequencies above the cutoff frequency. 


(Volume) 
Peak мын ча а without filtration 
| | N with filtration 
| \ 
| \ 
| | | 
L и | ааа» (Frequency) 
Cutoff 
BANDPASS FILTER 


The bandpass filter passes a narrow band of frequencies around the 
cutoff, and attenuates all others. 


(volume) 
Peak -F-- © e 2 ---- without filtration 


(^ with filtration 
A po 


deme, (Frequency) 
Cutoft 


HIGH/LOW PASS COMBINATION 


By combining the high and low pass filters it is possible to form what is 
called a notch reject filter which passes frequencies away from the cutoff 
frequency while attenuating at the cutoff frequency. 


RESONANCE 


Resonance has the effect of emphasizing a narrow band of frequencies 
around the cutoff point. 


(Volume) | 
with resonance 
E pp 
P4 N 
= = without resonance 
кчы шашы ————› (Frequency) 
Cutoff 
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PUTTING ІТ ALL TOGETHER. 


Now that you have convered all the basic operations of the 6581, it is time 
to put it to maximum use. The following program can be used to control all 
the features of the sound chip at the same time as giving you a visual 
representation exactly what is going on inside the chip including the 
shape of the ADSR envelope. 


18 
19 
16 


17 
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КЕМ жжж SOUND GENERATOR ЖЖЖ 

DIM Н‹50> < S0» „00‹ 502 

DIM NLC3,4»2,NHC3,4)5,PL3,42»5 ,„РНСЗ,9) ИК 3,4», 
ADC 3,4),SR(3,4):PS$="0" 

DV-.8:D(o 3>г0ружаизе Оса )=г20уж. 5: 06 5) 20 / ж1 : 06 6) 
=руж.5 


DIM М1< 14) „мес 14) , M3C 142 „МАС 14) 
DIMZ(14,52:FORR-1TO14:FORCS1TOS:READZC В,С 
:МЕХТ C,R 

DATA2 ,25,0,3,2,3,25,0,15,1,3,25,9,248.16,3, 
25,0,15,1,3,25,0,249,16,3,25 

DATA 9,15,1,1,25,0,32767,0,2,9,8,4,8,0,8,0, 
0,0,1,25,0,255,0,0,0,0,0,0,1,25 

рата 0,28,0,0,0,0,0,0,0,0,0,0,0 

Ks0:REM -REÁD TUNE DATA- 

кек+1:ВЕВО НСК? СК ,DUCKO : ЈЕ HCK2C2-1THEN 31 
ET-K-1 

DATA 25,177,Р50,28,Р14,Р50,25,17?,250,25, 
177,250,25,177,125,28,214,125 

DATA32 ,94,750,25,177,250,28,214,250,19,63, 
250,19,63,250,19,63,250 

DATA 21,154,63,24,63,63,25,177,258,24,63, 
125,19,63,250,-1,-1,-1 

CHIP=54272:FORV=1T03 

С=СНІР+‹ V-19*72NLCV,9)=C+O!NHCV,O)=C41 
=PLOV,@)=C+2:PHCV,@)=C+3: WC V, 0» =Сс+4 

ADC V,@>=5C+5:SR(V,@)=C+6:NEXT V 

Е.С) =CHIP+212FH( Ө? =СНІР+22:КЕ‹ 0) =СНІР +23 
МЫС) =СНІР+24 

6054858 : GOSUBS@:G7SUB :000:60702009 

REM ж CLEAR CHIP x 

SWITCH=0:FOR S=CHIP TO CHIP+28:POKE 
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5,0: МЕХТ: RETURN 

REM DISPLAY 

PRINT" alll": : POKES3281,0:POKES3280 , 4 : REM 
BACKGROUND AND BORDER 

PRINT"A-VOICEK $ > 123 
PRINT"B-VOLUME -----0-15 
PRINT°C-ATTACK -----0-240 

PRINT "D-DECAY —@-15 
PRINT"E-SUSTAIN -----0-240 
FREINT*F-RELERSE ———0@-15 

PRINT "G-DURATION 

PRINT"H-WAVE 175/\/ ,ЗЗ-РРРИ ,E€5="LI, 


PRINT" I-TEST NOTE C — 0 


PRINT"J-NOTE FREQ. 0-255 
PRINT"K-PLRY TUNE 
PRINT"L-LORD A REGISTER 
PRINT"M-<SPARE OPTION? 
PRINT"N-EXIT PROGRAM 


PR INT" граритеријирафирерититиририРа" ; Seun 


PRINT" -------------:-:---------- 


РАТМТ"А | 
РБІМТ"МІ 
PRINT"P | 
PRINT"L| 
PRINT"I| 
РКІМТ"ТІ 
РЕТМТ"И | 
РЕТМТ" О | 
РВІМТ "Е | 


PRINT" ‘-ATTACK——GECAY——SUSTA IN——RELEASE— "; 


50502 1000 

RETURN 

REM ж START x 

A^A-20:Y-0 

GET Аа%:ҮсҮүзі1: IFY213THENY-O 

IF AS=" "THENGOSUBSe 
GOSUBS00:PRINT"Z":CHRSC Y*652; ТРОВК= 11010: 
NEXT 


225 PRINT"IBE"; CHRE У+65 22 "ll": ІРАФ< "А "ОКАФ> "М" 
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жа «ә = => еее => eme = — 


© 


Go 
әт c à М) Oo {Л 


WW C) CO f 
© 


б^) О) D) 
к. pe қ. 
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R=ASC( А%2-64: X=O:Y=R-1:GOSUBSA0: 
PRINTCHRsC 18); АФ; 

GOSUB бод: масе» 15: М2 Е) =М 22: МЗ 2 > = 3) 
MACRO =М 4) 

IF R>1ANDR< 7THEN: МЕР : GOSUE 1000 : Rx M 
ONRGOSUB310,380,330,340,350,360,370,380, 
390,400,410,480,430,440 

IFC R=SANDW=E5 > THENGOSUB 110 

IF Z¢R,12< »8 THENGOSUB202G 


= MSO: YzR-1:GOSUBS00:PRINT"IE"; CHRSC Y *652; 


REM ж (IE. C-ATTACK iS ROW 3» 
КЕМ xk xoxo KC CORO E XC KR ROKK KKK RK KKK ER 
REM -VOICE* Э) ~ 

VC ом) с а) =м Ro: VC 32 zMSCR) 
RETURN 

REM -VOLUME - 

MVC 1 =Mic R)? 

RETURN 

REM -ATTACK - 

FOR Vz1 TO 3:8DKV,15zhM1CRO : NEHAT 
RETURN 

REM -DECAY- 


GOTO 200 

КЕМ ж OPTION DEPENDANT ROUTINES ж 

REM ж VALUES FROM INPUT ROUTINE ж 

REM ж HELD IN: * 

REM ж MICRO MECR? „МЕЈ „МАС Ву * 

REM * WHERE R IS THE OPTION ROW 4 
ж 
ж 


2 FOR Y=! TO 3:6D(V,2»2MICRO:NEAX 


RETURN 

REM -SUSTRIN- 

FOR V-1 TO 3:SRCV,12zMAICRO:NERT V 
RETURN 

REM -RELERSE- 

FOR V=1 TO 3:SR(V,28»5zMICRO : МЕМТ 
RETURN 

REM -DURATION- 

DUR=MIC R? 

RETURN 

REM -WAVE- 

IF M3SCROZ1THENFORV-1TOS:PHCV,12zMICR? 
PLY, 1)=M2CR)iNEXT V:MICR220: MECR) =0 
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£9 WOW W (0 
2 9 0 CO 0 
Own & Ww TO 


94 


moo wm (D 
won (m 


IF Mi¢R>=1THENW=17 

IF M@CR)=1THENW=33 

IF M3¢R9=1THENW=65 

IF МАСЕ) 2 17ТНЕМИ= 129 

FOR Vz1 TO ЗКМ,1)= И NEXT 


BE TURN 


REM -TEST NOTE- 

IF ЗМІТСН=0 THEN GOSUB 2096 

FOR V=1 TO З:РОКЕ LKXV,05,LC V, 12 S NEXT 
FOR Tz1TODLIR : NEXT 

IF PEEKS 197» - 3STHENSS? 
FORV=1TO3:POKELK V,O0? ЛК V, 128 ND8 S54: NEXT 


RETURN 


REM -NOTE FREG.- 


FOR У-1Т03 
RETURN 


INH Y, 1) ZMICRO:NLCV,122M2EC4 RO МЕЯТ 


REM -PLAY TUNE- 
GOSUBSO:IF SWITCH=0@ THEN GOSUB2006 


FORK = ТОЕТ 


FORV-1TOS3: IFY У 2 = 1 ТНЕМРОКЕМНС У ,8 2 ,HCK 2 
:РОКЕМ У ,0> ,LCKO POKEW V,0) „КМ, 1) 


МЕХТУ:РОР T=1TODUR: ТЕРЕЕКС 197 > ZE€A THEN 


Т-БОК:К-ЕТ 


NEXT Т:РОРУ = 1Т03:РОКЕЊЕ У,0 2 КУ, 12940254 


:МЕХТ У,К 


IF PEEK( 197 >< >64ТНЕМА 13 
GOSUB 2008: RETURN 

REM -LOAD A SID REGISTER- 
POKE CHIP+Mi¢C R? MECRO 


RETURN 


REM -SPARE OPTION- 


RETURN 
REM -EMIT- 
GCSUE за 


CLR followed by 2 times 
CSROWN 


PRINT" SEC ONT:HIT RETURN TO 
CONT INUEIBBEITI"; : END 


вотод5 
STOP 


қ 
CSRLEFT times 3 and 3 times 
CSRUP 


REM ж PRINT-AT ROUTINE ж 
РЕТМТ "24" ;  ТЕХОӨТНЕКРБ INTLEF ТЕМЕ, И 27 
IFY S@THENPRINTLEF TS Ү%,Ү9; 


RETURN 


63 


ы U 


224 - = P. 4-4 
© © © (Л sd 


REM xxx INPUT ROUTINES xxx 

IF 2¢R,1>=QTHENRETURN 

FORK =1TO4 th К) 20: NEXT 

МСК ве): У=К-1:6=2СВ, 32: Ц=2СЮ,4): 

С =20( 2,5): Ммгд :к=д :Р= 1024 *&*Yx40 

ON 2<Е,1> GOTO 620,700,800 

REM -USING INPUT?- 

IF К< >2аМОВ< > LQANDRX >12ANDR< > 13THENHL $-"" 
:6070638 

IF M=OANODRS > 12 THENHLS="HIGH" :GOTOESO 

IF M=OANDR=12THENHLS="REGISTER": 65070630 
IFR=12THENHLS= "VALUE"? U=255 :GOTOE3a 

HUS= "LOW" 

GOSUBSOO: РК ТТ "В"; БЕРТ S#,39-P0S¢ 622; 
:GO0SUBS5O0O0:PRINTHL Ф; : INPUTIS$:I-VALCCIS) 
GOSUBSOOD:PRINT"M "; 

ТЕ IXLORI^UTHENS20 
GOSUESOO:PRINT"";:IF М=1ТНЕМРК ИЧТ$ТК 46 МС 122; 
ӘТК%( 12;° m "3; :GOTO6EO 
PRINTRIGHTS#( STRE; 1) „ЏЕМ STRE 122-12; 

Me М+ 1 2 = 1: IF R=SORR=100RR=120RR=13> 
АамОМ-ӨТНЕММ-1:65070620 

RETURN 

REM -SET PULSE FREG.- 

GOSUB 1100: #=5: y=20:L=0:U=255:GOSUBS9@: 
PRINT"PULSE FREQUENCY"; : Х=25 : 6СОТОБЕВ 
REM -СНОТСЕ- 
FOROFFzHTOINCxCU-12»-4XSTEP INC: POKE 1024 +ОРР 
*Yx40 ,PEEKC 1024+0FF +ҮЖж40 AND 127 

NEXT ОРЕ: К=0 
GOSUBSOO0:POKEP ,„РЕЕК« РЈ АМО 127: РОКТ= 17050: 
МЕХТ:РОКЕР „РЕЕКСР2ОК 128 

GET BS: IFBS= "М" ТНЕМК =К + 1: РОКЕР „РЕЕКС РАМО 
127:60Т70Ұ50 

IFB#< УСНЕЗ 132 THEN? 10 

K=K+i spe Ko=1 

IF R=8 THEM 770 

IF K=U THEN 778 

НЕМ+ЕИМС : P=P+INC : GOTO 710 

IF R=S3ANDK=3THEN 275 

RETURN 

REM -INPUT USING UP & DOWN CURSOR- 
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801 GOSUBSO2:GOTOS05 

202 REM 

803 EC 3)=M1¢3) «DC 3) 1:BCA) MIC A2 XDC 49: 86 6» =M1¢6) 
«DC 6D 

804 B=-B 3) R>32-BC 4) ж R>4)-4e6 R252 -BC 80 x R28) 
+2: МҮ=23-М1(22/2: М=39: RETURN 

805 FOR 2=1704:М 2) S0: NEXT 

810 60508500 : MsMICR) 

820 возивзад:РЕ МТ" Iaf; M; "ШЕ "; 

824 GOSUBS@O:PRINT"E "::GETBS 

825 ІЕВФ=СНЕФ 13) ТНЕММ 1) =M:X=NX!Y=NY: 
GOSUBSOO:PRINT" ";:RETURN 

827 GOSUB 900 

230 IF B$«»"[]THEN860 

849 М=М+1МС: IFM>UTHENM=L 

850 GOSUB 900:GO0TOS20 

вво IF Bsco"NTHENSSe СС 

870 M=M-INC: IFM<¢LTHENM=U 

880 GOSUB 900:GOTO 820 

90€ REM xxx MOVE ENVELOPE CURSOR xxx 

910 IF R43 OR R=5 OR R26 THEN RETURN 

928 MX=KIMY=Y!X=NX!Y=NY:GOSUBS0@:PRINT" "; 

930 Х=В+МЖж0‹ Р): Ү=МҮ: 80608 509:РВІМТ" +"; :МХ=Х: 
NY=Y:X=MX:Y=MY 

399 RETURN 

1800 REM xxx UPDATE ADSR DISPLAY xxx 

1818 GOSUB 1108 

1080 X=2:Y=23:GOSUB SOO0:PRINT"O"; 

1930 R-3:G0SUB802 : K-B *MICRO XDCR2 : У= МУ: GOSUB 
500 :PRINT"A": 

1040 R-4:GOSUB808 : &-B*M1C RO XDCRO : Ys23-€ M1C 2) 
xM1C52/2402/2:G0SUB S00:PRINT"D—S—"; 

1060 R-6:G0SUB802 :X-B«MICRO ж0‹ Р) : У=23: GOSUB 
S00:PRINT"R'; 

1099 RETURN 

1100 REM ж CLEAR ADSR DISPLAY x 

1190 Xs28:FO0RY-15TO023:GOSUB590 : PRINT"I" ; 
ЦЕРТ 5,35): :NEXT 

1199 RETURN 

1900 REM ж PLOTTER x 

1220 M-HB:Y-Y8:G608SUB580:PRINTPS:; 

1999 RETURN 
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REM ж UPDATE PARAMETER DISPLAY x 
FOR Есі TO 14: IF 27ЧЕ,12-ӨТНЕМ1540 


XZ В, е >: YzR-1:Lz22C0€R,32:Uz2CR,d5: INCZZCR,S2 


ON 2CR.,.15»GOSUB 1600,1700,1800 
NEXT R 
RETURN 


REM -1- Дене) 


IF R=10QRR=13THENGOSUBS@0: PRINT" Я"; 
STRSCMIC RIDA STRE Масе ) );" №"; : СОТО 1633 
GOSUBSOO:PRINT"Ild"; MiCR2;*:GOSUB 508: 
РК ИМТ "а "; CSRLFT anda 

RETURN 

REM -2- 

K=ASFORZ =XTOINC КС U-194+KSTEPINCG 
Р=1924+7+Уж48:К=К+1 

M=-Mic Е руже Ка] ) -МасЕ) жСК=Р ) -МЗСА у x K=39 
-M4 L R) же К=4 ) 

IFM=1THENPOKE Р,РЕЕКСРООЕ128:60Т70 1730 
POKE P,PEEK(CPORND127 

NEXTZ 

RETURN 

REM -3- 

GOTO 1600 

RETURN 

REM ж LOAD CHIP WITH VALUES SET ж 

REM ж FROM OPTION LIST. * 

FOR Vz1 TO 3 

IF УСУ) zOTHENPOKELK V,0»,0:GOTO2130 
POKE М5 У,02,МХ5У,12 

POKE NHCV,@),NHCYV,1> 

POKE PLCV,025,PLCV, 12 

POKE РНСУ,02,РНСМ,12 

POKE bKV,@9, АС\У,1›АМО254 

POKE АП(У,0>2,апсу,12жА8айс<У,22 

POKE SROV,O»,SRCV, 12 *SRCV, 22) 

NEXT V 

POKE МУСА) „У. 1) 


2 SWITCH=1 


RETURN 
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SPECIAL SOUND EFFECTS 

Apart from generating sound by presetting the sound chip and controlling 
the sound via the ADSR envelope, some interesting sound effects can be 
produced by dynamically controlling various features of the sound chip 
during sound output. 


LINKING REGISTERS 

An effective way to dynamically control sound during output is to link the 
output from the envelope or waveform of one voice to one of the registers 
of another voice. To do this in BASIC you would need to continually 
PEEK one of the output registers (25 — 28) and POKE this value to the 
register representing the feature you wish to control. However, using 
BASIC would produce a staggered sound movement owing to BASIC's 
speed inefficiency compared to the speed of the sound chip's waveform 
oscillation. To produce smooth sound changes, you need a machine 
language routine to link the registers at high speed (preferably 
independent of your program). The following program "REGLINK" will 
suit this pupose. 


а GATA та: tee REGLINK yx% 

5 жжж POKE 828-823 WITH DESTINATION 
REGISTER TO BE 

Б жұж LINKED TQ SOUND REGISTERS 25-25 
RESPECTIVELY 

( Ы 

1а FOR I-0OTO186:READ А: РОКЕЗЭ і 52 + 1 ,А: NEXT 

20 POKE 56333,1827 

20 POKE 788,0 :РОКЕ 783,138 

40 РОКЕ 56323,123 

ісе DATA 160,23,185,25,8128,130,52,3,157,98 

118 DATA 212 

120 DATA 136,16,244,72,43,2343 


п 


The BASIC program will wedge the M/L (machine language) program 
into the operating system so as not to effect BASIC. We will use this 
program in the vibrato example on the next page. To use the routine use 
the following format: 

POKE [820 — 823], [any sound chip register] 

where locations 820 — 823 are mapped to sound chip registers 25 — 28 
respectively (see register map). 
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Even within BASIC programming, it is possible to generate some quite 
interesting effects, such as echo, vibrato, modulation, portamento and 
many others. 


ECHO 


There are many methods by which to accomplish this effect. One method 
is to generate a sound with a sharp attack, medium decay and low 
sustain level, then replaying the sound by turning off the wave and 
turning it on again with a lower volume setting and repeating this until 
either a zero volume has been reached or another sound is played. 

10 CHIP = 54272 : VOLUME = CHIP + 24 

20 POKE CHIP + 5, 16 + 3: POKE CHIP + 6,0-0 

30 V = 15: POKE VOLUME, V 

40 POKE CHIP + 1, 10 

50 FOR ECHO = 1 TO7 

60 POKE CHIP - 4, 17 

70 FOR COUNT = 1 TO 100 : NEXT COUNT 

80 POKE CHIP + 4, 0: REM TURN OFF WAVEFORM 

90V = V * 0.6 : POKE VOLUME, V : NEXT ECHO 
100 FOR I = 1 TO 500: NEXT : GOTO 30 


VIBRATO: (A rapid variation in frequency) 

This effect is accomplished by copying the output of voice 3's oscillator 
(register 27) to the input of the low note frequency of the voice(s) you 
wish to effect. When using this method, the vibrato will be controlled by 
voice 3, therefore voice 3 must be operating, preferably with the triangle 
waveform and the output turned off (to turn voice -3 output off, set bit 7 of 
register 24 to 1). If REGLINK' has been loaded then adding the following 
lines to the end of the initialization section of any Sound program will give 
the vibrato effect to each note played. 


POKE CHIP + 15, 10: POKE CHIP + 18, 17 : POKE CHIP + 24, 128 + 
volume setting 

POKE 822, 0 : POKE 823, 28 

where the vibrato speed is controlled by the frequency setting of voice 3. 


MODULATION: (A continued variation in volume) 


This effect is accomplished in much the same way as vibrato except that 
voice 3's oscillator (register 27) is linked to the master volume control. 
Also, the fact that register 27 outputs from O to 15 means that the output 
from register 27 must first be divided by 17. The BASIC statement to link 
the two registers (for voice 1) is as follows: 

POKE CHIP + 24, PEEK (CHIP + 27)/ 17 

where CHIP = 54272 
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In this case 'HEGLINK' cannot be used owing to the fact that volume 
requires values 0 — 15 whereas a direct linkage would give values 0 — 
255. Therefore the above BASIC statement must be executed as often 
as possible to produce the desired effect. 


The following program demonstrates modulation: 

10 CHIP = 54272 

20 POKE CHIP + 1, 30: REM NOTE FREQUENCY 

30 POKE CHIP + 6, 240 : REM MAX SUSTAIN 

40 POKE CHIP + 15, 10 : REM MODULATION SPEED 

50 POKE CHIP + 18, 17 : REM TRIANGLE WAVE (VOICE 3) 

60 POKE CHIP + 24, 128 : REM TURN OFF VOICE 3 OUTPUT 
* continual link of waveform to volume * 

70 POKE CHIP + 24, PEEK (CHIP + 27) / 17 + 128: GOTO 70 


Run the above program and edit line 40 to obtain different modulation 
speeds. 


PORTAMENTO: (Frequency slide) 
The portamento is a gradual slide from one frequency to another. It can 
be used to simulate an accellerating jet, a falling bomb or it can be used in 
music to create a sliding instrument such as a trombone. This effect is 
accomplished by incrementing/decrementing the frequency of the last 
note played to the frequency of the next note played. Your portamento 
subroutine should look somethng like this: 
1000 INC = SGN (NF - OF) 
1010 OF = OF + INC 
1020 POKE CHIP + 1, OF 
1030 IF OF < NF THEN 1000 
1040 RETURN 
where CHIP = 54272 

OF = high frequency of old note 

NF = high frequency of next note 
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ТНЕ SOUND CHIP REGISTERS 


Bit significance Register usage 
iVoice-1) 


NL» 
NH? 
PL2 
PH2 


RING 
MOD 


Low byte of note trequency 

NH: | МНо | High byte of пое trequency 

PL: | РЦ | Low byte ot pulse width 
High byte of pulse width 


| 
' 
SYNC | GATE| Wave torm control 


Attack. decay for envelope 


Sustain/retease for 
envelope 


Voices 2 and 3 are mirror images of the above except that they are stored 
in registers 7 to 13 and 14 to 20 respectively. 


Bit significance Register usage 
(Filter) 
21 — — CL? Low cutoff ttequency 
22 Сна | СНз! CH2 CHo | Highcutott trequency 
23 Ro Ғех | F3 F1 Fitter switches and resonance 
24 LP АИ Na | | | Vo Filler modes and volume 
Bit significance Register usage 
(Misc.) 
25 | Pr [рь " Р || Ро | радае я 
26 P; Pe Р! Ро Paddle - у 
27 О; Oc О Оо Oscillator - 3 output 
28 E; Её — | Е' | E | Envelope - 3 output 


NOTE: The sound chip registers are accessed via memory locations 
54272 to 54300. 
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REGISTERS 0 AND 1 (Location 54272 and 54273) 


(Low and high bytes of note frequency) 

These two registers form a two byte value corresponding to the 
frequency of a note played. To obtain the actual frequency of the note 
being played multiply the two byte value by 0.059604645. 


REGISTERS 2 AND 3 (Location 54274 and 54275) 

(Low and high bytes of pulse width of pulse wave) 

These two registers form a 12-bit value corresponding to the pulse width 
of the pulse wave. The width of the low pulse of the pulse cycle as a 
percentage of the width of the pulse cycle is given by the following 
formula: 

Low pulse width = (12-bit value/40.95)% of the pulse cycle. Where a low 
pulse width of 0% or 100% is a constant DC signal (i.e. zero output) and a 
low pulse width of 5096 is a square wave. 


REGISTER 4 (Location 54276) 

(Waveform control) 

This register serves several functions where each bit serves a seperate 
function. 


Bit О (Gate Bit): 

The gate bit controls the envelope generator. Setting this bit to a 1 turns 
on the ADSR envelope and begins the envelope cycle at the attack 
stage, goes on to the decay stage and finally the sustain. The sound will 
continue at the sustain level until the gate bit is set to zero, in which case 
envelope control will continue to the release stage. If the gate bit is set to 
zero before the sustain stage has been reached then envelope control 
will jump to the release stage. 


Bit-1 (Sync Bit): 

Setting the sync bit to 1 causes the waveform from voice 3 to be 
syncronized with voice 1. Varying the frequency of voice 3 will change 
the overall waveform output of voice 1. 


Bit-2 (Ring Mod Bit): 

Setting the ring mod bit to a 1 replaces the triangle waveform of voice 1 
with a 'ring-modulated' combination of oscillators 1 and 3 for giving the 
output a bell type sound. Varying the frequency of oscillator 3 causes 
changes in the overall waveform output of voice 1. 


Bit-3 (Test Bit): 

Mainly used for testing, this bit when set to 1, causes oscillator 1 to reset 
to 0 and lock there until the bit is reset. However, it can be used to 
synchronize oscillator 1 to an external device. 
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Bit-4 (Triangle Waveform): 
When set to 1, this bit selects the triangle waveform to be used for output 
of oscillator 1. 


Bit-5 (Sawtooth Waveform): 
When set to 1, this bit selects the sawtooth waveform. 


Bit-6 (Pulse Waveform): 
When set to 1, selects the pulse waveform. 


Bit-7 (Noise Waveform): 
When set to 1, selects the noise waveform. 


REGISTER 5 (Location 54277) 

(Attack/decay) 

This register is used to select the attack and decay rate for voice 1's 
ADSR envelope. 


Bits 4 — 7 (Attack Rate): 
Selects an attack rate from 0 — 240 where the attack times range from 
2ms to 8s. 


Bits 0 — 3 (Decay Rate): 
Select a decay rate from 0 — 15 where the decay times range from 6ms 
to 24s. 


REGISTER 6 (Location 54278) 

(Sustain/release) 

This register is used to select the sustain level and release rate for voice 
1's ADSR envelope. 


Bits 4 — 7 (Sustain Rate): 

Selects a sustain level from 0 — 240 where the sustain setting is a 
proportion of the volume setting. To obtain the actual sustain volume use 
the following equation: 

Sustain volume = (volume setting "sustain setting) / 240 


Bits 0 — 3 (Release Rate): 
Selects a release rate from 0 — 15 where the release times range from 
6ms to 24s. 


REGISTERS 7 — 13 (Locations 54279 — 54285) 

(Voice 2) 

These registers are functionally identical to registers 0 — 6 (voice 1) with 
the following exceptions: 

1. SYNC — Synchronizes oscillator 2 with oscillator 1. 
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2. RING MOD — Replaces the triangle output of oscillator 2 with the 
ring modulated combination of oscillators 2 and 1. 


REGISTERS 14 — 20 (Locations 54286 — 54292) 

(Voice 3) 

These registers are functionally identical to registers O — 6 (voice 1) and 
registers 7 — 13 (voice 2) with the following exceptions: 

1. SYNC — Syncronizes oscillator 3 with oscillator 2. 

2. RING MOD — Replaces the triangle output of oscillator 3 with the 
ring modulated combination of oscillators 3 and 2. 


REGISTERS 21 AND 22 (Locations 54293 and 54294) 


(Cutoff frequency) 

These two registers form an 11-bit value corresponding to the cutoff (or 
centre) frequency of the programmable filter. They select a cutoff value 
of 0 — 262 where the cutoff frequency ranges from 30 Hz — 12KHz. 


REGISTER 23 (Location 54295) 


(Resonance/filter) 
This register is used to select the resonance and filter switches. 


Bit-O (Filter Switch 1): 
When set to 1, voice 1 is sent through the filters before output. When set 
to 0, voice 1 is sent directly to output. 


Bits 1 and 2 (Filter Switches 2 and 3): 
Same as bit O but for voices 2 and 3 respectively. 


Bit-3 (Filter Switch EXT): 
Same as bit O but for external audio input. 


Bits 4 — 7 (Resonance Setting): 

This register forms a 4-bit value corresponding to the resonance setting 
of the programmable filter. They select resonance settings that range 
from 16 — 240 in steps of 16. The resonance acts on a small band of 
frequencies around the selected cutoff frequency. 


REGISTER 24 (Location 54296) 
(Voice 3's switch/filter modes/volume setting) 


Bits 0 — 3 (Volume Setting): 


These four bits are used to select volume settings which range from 0 — 
15. This is a master volume control, however each voice may be varied 
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by either setting a large attack and setting the gate bit to 0 during attack or 
by setting a different sustain level for each voice, thus achieving different 
volume levels for each voice within the absolute level set by the above 
four bits. 


Bits 4 — 6 (Filter Modes): 

These three bits are used to select the filter modes for the programmable 
filter. Bit 5 selects the 'lowpass' filter, bit 6 selects the ‘bandpass’ filter 
and bit 7 selects the ‘highpass’ filter. More than one filter may be selected 
at one time. For example, a ‘notch reject filter can be set up by selecting 
the lowpass and highpass filters. 


Bit-7 (Voice 3 Switch): 

Setting this bit to 1 causes voice 3 output to be disconnected without 
effecting any of the voice 3 controls. This switch is used when voice 3 is 
used to control another voice and the output of voice 3 is not needed. 


REGISTERS 25 AND 26 (Location 54297 and 54298) 

(Paddles) 

These registers allow the microprocessor to read the positions of a pair of 
paddles conected to port-1 (labelled port-2 on computer casing). The 
paddies should give readings of 0 for minimum resistance and 255 for 
maximum resistance. By reading these registers and writing their 
contents to other sound chip registers, it is possible to control the sound 
chip with the paddles. 


REGISTER 27 (Location 54299) 

(Oscillator 3 output) 

This register allows the microprocessor to read the waveform output of 
voice 3 where any waveform will produce values between 0 and 255. For 
example, if the sawtooth is selected, register 27 will output incrementing 
oe from 0 to 255 at arate depending on the frequency setting of voice 


REGISTER 28 (Location 54300) 

(Envelope 3 output) 

Same as register 27, but this register allows the microprocessor to read 
the envelope output of voice 3. 
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MUSIC NOTE VALUES 


This appendix contains a complete list of Note#, actual note, and the 
values to be POKEd into the HI FREQ and LOW FREQ registers of the 
sound chip to produce the indicated note. 


MUSICAL NOTE OSCILLATOR FREQ 
[ wow | oc | orma | m | ow 
C-0 


0 268 1 12 
1 с%-0 284 1 28 
2 D-0 301 1 45 
3 D#-0 318 1 62 
4 Е-0 337 1 81 
5 | F-0 358 1 102 
5 FS -0 379 1 123 
i 7 G-0 401 1 145 
8 G#-0 425 1 169 
9 А-0 451 1 195 
10 A#-0 477 1 221 
11 B-0 506 1 250 
16 с-1 536 2 24 
17 C#-1 568 2 56 
18 0-1 602 2 90 
19 | р#-1 637 2 125 
20 | Е-1 675 2 163 
21 F-1 716 2 204 
22 F4 -1 758 2 246 
23 G-1 803 3 35 | 


МОТЕ 


24 
25 
26 
27 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
48 
49 
50 
51 
52 
53 
54 
55 
56 
57 
58 
59 
64 
65 
66 
67 
68 
69 
70 
71 
72 
73 


о 0 0 4 4400 пр др BB A BWW WwW о 


о 


MUSICAL NOTE OSCILLATOR FREQ 


MUSICAL NOTE OSCILLATOR FREQ 
[wow | осли [эсем | м | ом 
223 


74 Aft -4 7647 29 
75 B-4 8101 31 165 
80 С-5 8583 33 
81 с#-5 9094 35 
82 C-0 9634 37 
83 С#-0 10207 39 
84 D-0 10814 42 
85 F-5 11457 44 
86 F3 -5 12139 47 
87 G-5 12860 50 
88 G#-5 13625 53 
89 A-5 14435 56 
90 А#-5 15294 59 
91 B-5 16203 63 
96 C-6 17167 67 
97 C$ -6 18188 71 
ов | D-6 19269 75 
99 | D#-6 20415 79 
100 | Е-6 21629 84 
i0 | F-é 22915 89 
102 | Ғй-6 24278 94 
103 G-6 25721 100 

104 Gs -6 27251 106 
105 A-6 28871 112 

| 106 As -6 30588 119 
107 B—6 32407 126 

| 12 | C-7 | 34334 134 
из | C4-7 36376 142 
n4 | 0-7 38539 150 
ns | 0-7 40830 159 

i 116 E-7 43258 168 

| n7 F-7 45830 179 

| 118 Fs -7 48556 189 

| 119 Guy 51443 | 200 
120 G#-7 54502 212 

| 121 А-7 57743 225 
122 А#-7 | 61176 238 

| 123 B-7 64814 253 
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FIER SETTINGS 


puc pU m 


Low cutoff frequency (0-7) 


High cutoff frequency (0—255) 


Resonance (bits 4-7) 
Filter voice 3 (bit 2) 
Filter voice 2 (bit 1) 
Filter voice 1 (bit O) 
High pass (bit 6) 
Bondposs (bit 5) 
Low poss (bit 4) 
Volume (bits 0-3) 
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СНАРТЕН 5 


GRAPHICS 

As you probably already know, the Commodore 64 has graphics 
capabilities available directly from the Keyboard, using the graphics 
characters, colour contro! keys, cursor control keys and PRINT 
statements. However, it also has more powerful graphics capabilities 
available through direct user control of sections of the memory. 


Graphics Memory 

There are three blocks of memory used to control graphics on the 
Commodore 64 — screen memory, colour memory and character 
memory — and a few odd bytes we'll discuss as we get to them. First, a 
brief description of the three blocks, then a more detailed coverage of 
how to use them. 


Screen memory consists of one byte for each character position on the 
screen. Since the screen has 1000 character positions — 25 rows of 40 
characters — screen memory has 1000 bytes. The first 40 bytes of 
screen memory correspond to the first row on the screen, the second 40 
bytes correspond to the second row, and so on. 

Colour memory, like screen memory, consists of 1 byte for each screen 
character position. Each byte contains a code for the colour in which 
characters will be displayed at that position. 

Character memory contains the coded representations of all printable 
characters. It is broken into 2 blocks — one for upper case and graphics 
characters, the other for lower and upper case characters. 

To display a character on the screen, the Commodore 64 finds the code 
for the character in screen memory, uses the code as a pointer to the 
character representation in character memory, finds the colour of the 
character position in colour memory and uses all this information to 
display the character. 


LOW RESOLUTION GRAPHICS 

Screen Background and Border Colours. 

These colours are controlled by the value in locations 53280 and 53281. 
The values for background/border colour combinations are given in 
Appendix |. 

e.g. POKE 53280, 7 : POKE 53281, 4 gives a yellow border around a 
purple screen. 
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Character Colour 

Keyboard Control | | 
A- previously mentioned, the colour of characters can be dictated using 
the colour control keys. These keys can be included in strings within a 
program. They change the value in byte 646. This value can also be 
changed by POKEing. 


Changing this value causes everything after the change to be printed in 
the colour set, i.e. it changes character colour from then on. From this it 
follows that you must change this value every time you want to change 
character colour just as you do when using the colour control keys. 


Colour Memory Control 

Colour memory uses locations 55296 to 56319. You can POKE values 
into colour memory thus controlling the colour of individual character 
positions on the screen. This determines the colour of characters POKEd 
into screen memory, but not characters which are PRINTed. These are 
controlled by byte 646. 


You may now determine the colour of characters POKEd into screen 
memory by POKEing the desired values into the relevant bytes of colour 
memory. 


0 4 Ршре 8 Огапде |12 Сгеу2 

1 White 5 Green 9 Brown 13 Light Green 
2 Red 6 Blue 10 Light Red | 14 Light Blue 
3 Cyan 7 Yellow 11 Grey 1 15 Grey3 


e.g. 10CM = 55296 
20 FOR J = CM ТО СМ + 1000 
30 POKE J, 7: NEXT 


Screen Memory 

The default position of screen memory is at 1024. Screen memory canbe 
moved to any location that is a multiple of 1024 as long as it doesn't sit on 
top of other memory locations such as your BASIC program. 

Byte 648 contains the number of К bytes from 0 to screen memory 
address. Byte 53272 contains the number of K bytes from О to screen 
memory address. Byte 648 is a pointer for the screen editor. Byte 53272 
is the actual pointer. 
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The simple way to calculate the address of the bytes in screen memory 
you want to РОКЕ is to use the formula — SM + (row*22) + column. 
Where SM is the start of screen memory, 'row' is the screen row number 
(0 is the top row) and 'column' is how far along the row (also starting from 
O at the left of the screen). 

Graph paper is handy for working out screen displays. 

The values POKEd into screen memory act as pointers into character 
memory. The are NOT the ASCII values of the characters. The screen 
codes corresponding to ASCII values are shown below: 


ASCII value Screen value 


0-31 None – not displayable 
32-63 32-63 

64-95 0-31 

96-127 64-95 


128-159 None — not displayable 
160-191 96-127 

192-254 64-126 

255 94 


You will notice that some screen codes are shared by two ASCII codes. 
This is because character memory is broken into two blocks. The 
character displayed by a screen code corresponding to two ASCII codes 
will depend on which block of characters is being used. The screen code, 
as was mentioned, acts as a pointer into the block of character memory. 
(see Character Memory section for more details.) 

A table of ASCII and screen codes for the two character sets is given in 
Appendix A. When you know in advance what characters are to be 
POKEd into screen memory, this table may be used to look up the screen 
values. However, for some applications, such as GETting characters 
from the keyboard, the characters can not be known in advance. The 
ASCII codes convert in blocks of 32 so the screen codes may be 
calculated using the following subroutine: 


10 GETK$ 
20 SC - ASC (K$) 
30 ON INT (SC/32) +1 GOTO 40, 50, 60, 70, 80, 90, 100 
40 SC = —1: RETURN 
50 RETURN 
60 SC = SC-64 : RETURN 
70 SC = SC-32 : RETURN 
80 SC = -1 : RETURN 
90 SC = SC-64 : RETURN 
100 IF SC = 255 THEN SC - 94 : RETURN 
101 SC = SC-128 : RETURN 
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This subroutine returns —1 when the character is not displayable. The 
main program can then decide what to do with it. 


The following example program POKEs red ‘A's into the top half of the 
screen, green 'Z's into the bottom half: 


10 REM Set up colour memory 
20 CM - 55296 
30 REM Red character positions 
40 FORJ = ОТО 499 
50 POKE СМ + J, 2: NEXT 
60 REM Green character positions 
70 FOR J = 500 TO 1000 
80 POKE CM + ,5: NEXT 
90 SM = 256" PEEK (648) 
100 REM Poke A's into first half of screen memory 
110 FORJ= 0 TO 499 
120 POKE SM + J, 1: NEXT 
130 REM Poke Z's into second half 
140 FORJ = 500 TO 999 
150 POKE SM + J, 26: NEXT 
160 GOTO 160 : REM Wait for STOP keystroke 


Character Memory 

Before going into the Commodore 64's character memory it would be 
worthwhile to first have a look at the character table and then follow this 
with the memory and how to use it in designing your own characters. 


The first block of character memory — upper case, graphics, reversed 
upper case, and reversed graphics occupies the ROM locatons 53248 — 
55295. The second block — lower case, upper case, reversed lower 
case, reversed upper case and graphics — occupies ROM locations 
55296 — 57343. 

Characters are displayed as patterns of dots. Each character position on 
the screen is composed of an 8 x 8 square of dots (pixels). Character 
memory contains the information which tells the computer which dots to 
turn on or off for a particular character. If a bitis 1, the dot is on (displayed 
in character colour). If it is O,the dot is off (displayed in background 
colour). Therefore, to cover 64 dots, each character representation takes 
8 bytes of memory. 
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e.g. Тһе character “А” 


Binary Decimal Equivalent 
00011000 
00100100 
01000010 
01111110 
01000010 
01000010 
01000010 
00000000 


og888889 


As mentioned earlier, the screen codes act as pointers into character 
memory. As you can see from the table in Appendix A the screen code for 
A in character set 1 is 1. Its 8 byte representation is therefore stored in: 
53248 + (81) = 53256 and the next 7 bytes 
so byte 53256 contains the value 24 
so byte 53257 contains the value 36 
so byte 53258 contains the value 66 
so byte 53259 contains the value 126 
50 byte 53260 contains the value 66 
so byte 53261 contains the value 66 
so byte 53262 contains the value 66 
so byte 53263 contains the value 00 
In general, to find the starting address of the representation of a 
character with screen code X use: 
53248 + (8*Х) for character set 1 
55296 + (8'X) for character set 2 
You can change from one character setto the other from the keyboard as 
described earlier, or by changing the value of the character memory 
pointer — byte 53272. Its value is normally 21 (upper case and graphics) 
or 23 (upper and lower case). 
Designing your own characters 
Since the built-in character sets are in ROM you cannot directly change 
them. However, as you have seen, the character memory pointer can be 


changed. So the secret to using a character set you design yourself is to 
change the pointer to point to your set. 


First, however, you must design your characters. Take a piece of graph 
paper (or draw an 8 x 8 grid), and for each special character you want, 
set it up as below. As an example, our grid contains a hat character. 


83 


12864 3216 8 4 2 1 


Binary Decimal 
00111100 60 
00111100 60 
00111100 60 
00111100 60 
00111100 60 
00111100 60 
11111111 255 
00000000 0 


Fill in the squares to create the character you want. Then, for each row. 
add up the values of the squares filled in. The sum is the value you will 
POKE into the byte. 
It is usual to copy some of the built in character set into RAM and then 
change those characters you wish to. 
A sample exercise should clarify this. 
Type POKE 53272, 28 
All characters on the screen should now turn to random dots, since the 
character memory pointer now points to an area of memory where no 
characters have been defined — the bytes here contain random values. 
STOP RESTORE will return you to the normal character memory. 
Now run the following program: 
5 REM* CHARACTER GENERATION DEMO * 
10 POKE 53272, 28 
20 POKE 52, 48 : POKE 56, 48 : CLR 
30 POKE 56334, PEEK (56334) AND 254 
40 POKE 1, PEEK (1) AND 251 
50 FORJ 20 TO 511 
60 POKE 12288 + J, PEEK (53248 + J) 
70 NEXT 
80 POKE 1, PEEK (1) OR 4 
90 POKE 56334, PEEK (56334) OR 1 
100 PRINT “А” 
110 FOR J = 12296 ТО 12303 : READ V : POKE J, V: NEXT 
120 DATA 60, 60, 60, 60, 60, 60, 255, 0 


Explanation: 
Line 10— changes the character memory pointer — character 
memory now starts at 7168 
20— makes sure that BASIC doesn't overwrite the 
character set 
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30— turn off interrupts 
40— switch character ROM in 
50-70— copies the first 64 characters (512 bytes) from 
character set 1 in ROM to RAM, starting at 7168 
80— switch out character ROM 
90— turn on interrupts 
100— prints an 'A' 
110— changes the definition of 'A' in character memory to 
a hat 
120— Data statement holding the values of the new 
definition of 'A' 


Note that all A's displayed on the screen change. 
Where to put the new character set 


A safe (but not the only) place to put character memory is at 12288. To do 
this POKE 53272, 28. 
To ensure that BASIC doesn't overwrite your character set you must 
change the pointers to the end of BASIC program memory and the end of 
string storage memory. If you are starting character memory at 12288, 
you can protect it by using: 

POKE 52, 48 : POKE 56, 48 : CLR 
This should be done before any BASIC variables are defined or 
referenced, otherwise BASIC may not recognise the limitation. 
Having done the above, you may now POKE in your new character set, 
starting at 12288. Remember that screen codes act as pointers into 
character memory, so if you POKE a value of 7 into screen memory, the 
eighth character in the set will be displayed. 
For those who wish to put character memory elsewhere, or use a larger 
set, the following details will be useful. 
In fact, both screen and character memory pointers can be changed. 
Byte 53272 controls both. The first 4 bits gives the number of K (1024) 
bytes from 0 to the start of screen memory. The last 4 bits gives the 
number of К bytes from О to the start of character memory. 
However, to complicate matters, both of these numbers are calculated 
using addresses as seen by the Video Interface Chip. It uses different 
addresses to the rest of the computer to access the same locations. The 
table below illustrates the differing addresses for the memory blocks the 
VIC chip can access. 
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Jpper case characters 
Graphics characters 
Reversed upper case 
Reversed graphics 
Lower case 

Upper case and graphics 
Reversed lower case 
Reversed upper case 


& graphics | 


Example calculation of value of byte 53272. To put screen memory at 
1024, character memory at 12888: 


addresses ; Ordinary addresses 


Address No. of K from 0 
Screen - 1024 1024/1024 = 1 
Character - 12288 12288/1024 = 12 
Binary representation Screen mem Char mem 
of byte 53272 0001 1100 = 28 


To calculate it in decimal, use: 
(16 * Screen memory pointer) + Character memory pointer 
(16 * 1) + 12 = 28 
So, POKE 53272, 28 


Tocalculate the POKE values of bytes 52 and 56, work out the number of 
"АК bytes (256) from O to the start of character memory. Use ordinary 
addresses, not the VIC chip addresses. 

In this example it is 12288/256 — 48 

so POKE 52, 48 : POKE 56, 48 : CLR 

Bytes 55, 56 indicate the end of BASIC program memory. 

Bytes 51, 52 indicate the start of BASIC string storage. 

Bytes 51 and 55 аге 0 after a CLR or RUN and so can be ignored. 


Some programs, such as the Programmer's Aide, check byte 644 
instead of 55, 56 to find the end of BASIC memory. To avoid these 
overwriting your character set you should POKE the same value into 
644, if you're using such a program. 

High Resolution Graphics 

In low resolution graphics, characters are the focus of attention. You 
define characters, you move characters around and so on. In high 
resolution graphics the dots (pixels) which make up the characters are 
the focus of attention. The difference between the two is in programming 
technique, not in the way in which things are displayed. 
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Typically, in low resolution, the character set, once defined, is not 
changed, while the screen memory is. In high resolution, screen 
memory, once defined, is not changed, while character memory is. The 
trick is to think of character memory not as defining characters, but as 
defining the screen - one bit in character memory controlling one pixel on 
the screen. 


The following program demonstrates high-resolution plotting: 


First, we set up our high-res screen and clear it 


5 REM ж HIRES PLOTTING ж 

18 POKES3272,29 :REM MOVE SCREEN 

ee POKESS265,59 :REM HIRES BIT MODE 

за FORJ=8192T016191 

49 РОКЕЈ,О 

50 MENT 

Next we POKE in the background colour by POKEing the colour codes 
into Screen memory 

ва FORJ=1a24TO202e3 

га POKE J,16 

80 NEXT 

зв t: 

Finally a small routine to enable control of pixel plotting by using the A, D, 
W and X keys 

186 FOKE 650,128 

118 HR=8192 

120 GET A$:IF аАФ= " "ТНЕМі20 

130 IFAS="A"THENK=xX-1 

140 ТЕА$="О"ТНЕМХ =Х+1 

150 IFAS="W" THENY=Y-1 

160 IFA#="K%"THENY=Y+1 

The following lines calculate the next pixel position and perform a 
boundary test before plotting the next point 


209 P-HR*INT(CY/82*380*8* INTC X/8 > +0 YAND? > 
210 IFPFX81980RP»16191THEN120 

220 POKE P,PEEKS POOR 2 TU? -€ ХАМО? > >) 

230 GOTO 120 


87 


This creates a 320 x 200 pixel hi resolution screen. Now, to change а 
pixel, we merely need to change the bit in character memory 
corresponding to it. If we consider the high resolution work area as a 320 
x 200 grid: 


у 320 
0 Á 


200 


we can give any pixel X and Y co-ordinates and work out the bit to change 
as follows: 
CHAR = INT (Х/8) 
ROW = INT (Y/8) 
BYTE = 8192 + ROW * 320 + CHAR *8 + (Y AND 7) 
BIT = 7 - (X АМО 7) 
To turn 1 bit on while leaving the other bits in the byte unchanged, OR a 
mask with the current value of the byte. 
e.g. POKE BYTE, PEEK (BYTE)OR(2 : ВІТ) 
Suppose we want to turn on the pixel with co-ordinates (35, 32). For the 
sake of the example assume the relevant byte has a value of 47. Using 
the formulae above we get: 
POKE 9504, PEEK (9504) OR2 : 4 
214 00010000 
ORPEEK(9504) 00101111 
gives 00111111 
To turn off a bit, AND NOT a mask with the current value of the byte 
e.g. POKE BYTE, PEEK (BYTE) ANDNOT (2 : BIT) 
To turn off the bit we just turned on 
POKE 9504, PEEK (9504) AND МОТ (2 ! 4) 
2:4 00010000 
NOT2+4 11101111 
AND PEEK (9504) 00111111 


gives 00101111 
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The following example program plots a sine curve on the high resolution 
area. 


10 REM * SINE WAVE Ж 

28 ҒОР.1-818270161981 :POKEJ,@: NEXT 
за POKES3272 ‚29: РОКЕ5З265 ‚53 

ад POKES3880,0:POKES3281,0 

Әй PRINT СНК%С 1472 

ЕЯ FOR J=1024T02023:POKES, 1€: NEXT 
100 FORH-OTOS3S2O 

110 у=100+51М 5750) ж100: GOSUB200 
120 NEXTAR 

130 6070130 

200 LINE-YRND? 

210 BYTE=8192+INTC \/8 ) x320 + INTC 778 >) «8 *L INE 
220 BIT=7-< хАМО?2 

230 РОКЕВҮТЕ ,РЕЕК‹ BYTE ОКС 2tBIT> 
240 RETURN 


Unfortunately, BASIC is too slow for most high resolution applications. It 
is generally better to use machine language programs which are many 
times faster. 

Multicolour Characters 


So far, each character position has been restricted to 2 colours - 
background and character. At the expense of resolution, it is possible to 
add two more colours - border and auxiliary. 


Instead of a character position being 8 x 8 dots, in multicolour mode it is 
4 x 8 dots - i.e. it takes 2 bits to define a dot, which is now 2 pixels wide. 


e.g. 
screen dot 3 2 1 0 


character byte | 10 оо | от | 11 | 


The colours selected by each 2 bits are as follows: 


COLOUR REGISTER LOCATION 


Background #0 (screen colour) 53281 


Background #1 53282 
Background #2 53283 
Lower 3 bits in colour memory Colour RAM 
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When designing multi-coloured characters, the РОКЕ values for 
character memory are calculated exactly as for normal characters. 


You know how to set background, border and character colours. The 
auxiliary colour can be any of the 16 background colours - the following 
codes apply: 


0- Black 8 - Orange 

1 - White 9 - Brown 

2 - Red 10 - Light Red 

3 - Cyan 11 - Grey — 1 

4 - Purple 12 - Grey — 2 

5 - Green 13 - Light Green 
6 - Blue 14 - Light Blue 
7 - Yellow 15- Grey — 3 


It is set by POKEing the relevant value into the locations from the bit-pair 
table. 

The video chip must be made to interpret character memory bytes as 
multicoloured. To do this, bit 4 of location 53270 must be set to 1 and bit З 
of each colour memory byte that you want multicoloured must be set to 1. 
So when you POKE the colour codes into colour memory add 8 to the 
normal codes. The same technique applies to characters PRINTed. 
POKEing the usual code + 8 into byte 646 will make the Video chip 
interpret character codes as multicoloured characters when PRINTing. 


Multicolour and normal resolution characters may be mixed by setting 
the 4th bit on some colour memory nybbles and not on others. 


EXTENDED BACKGROUND COLOUR MODE 

The single additional ability given to you in this mode is the ability to 
control the background colour of a character position on the screen 
independent of the global background colour. 

However, once this mode is selected, you can only address the first 64 
characters in your programmable character set. This is because two of 
the bits of the character code are used to select the background colour. 
Use the following table to select the extended background colours for 
characters POKEd onto the screen. 


Background Colour Register 


0 — 63 
64 — 127 


128 — 191 
192 — 255 


To select extended background colour mode, use: 
POKE 53265, PEEK(53265) OR 64 
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MULTICOLOUR BIT МАР MODE 

Multicolour bit map mode works in the same way as standard bit map 
mode except that plotting is done in multicolour. This mode suffers the 
same resolution loss as multicolour mode owing to the bit pair colour 
representation. The bit pairs don't represent the same colour information 
as in multicolour mode. The bit pair colour table for multicolour bit map 
mode is as follows: 


| Bits | Colour information 


Background colour #0 

Upper 4 bits of screen memory 

Lower 4 bits of screen memory 

Lower 4 bits of colour memory for that byte 


Multicolour bit map mode is selected by setting bit 5 in location 53265 
and bit 4 of location 53270. 

Use the following BASIC statement to achieve this: 

POKE 53265, PEEK(53265) OR 32 : POKE 53270, PEEK(53270) ОН 16 


SPRITES 

A sprite is a form of user defined character that is controlled by a powerful 
video chip called the 6566. Up to 8 sprites can be displayed at a time 
automatically. More sprites can be displayed using Raster Interrupt 
techniques. Sprites have the following advantages over user defined 
characters: 

1. Pixel by pixel movement in any direction 

2. The 24 by 21 pixel sprite shape can be moved as though it were a 
single character 

3. Magnification (2X) in both horizontal and vertical directions 

4. Independent high-res/multicolour mode 

5. Selectable sprite to background overlay priority 

6. Sprite to sprite collision detection 

7. Sprite to background collision detection. 

A sprite is larger than a character therefore more data is needed to define 
the shape of a sprite. A sprite is 24 pixels (3 bytes) wide and 21 pixels 
high which gives us a total of 3 x 21 = 63 bytes of data to define the shape 
of a single sprite. Even though a single sprite is made up of so much data, 
the video chip moves the sprite as if it were a single character. 


Sprite Pointers 

The 64 byte blocks of data that define the shape of each sprite can be 
placed іп any 64 byte multiple of unused memory. In order to tell the video 
chip where in memory each sprite-shape block is located, eight sprite 
pointers are provided. 
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The shape of a sprite may be changed by adjusting the sprite pointer 
allocated to that sprite to point to a different block of sprite-shape data. 
Using this method a single sprite may be animated by quickly changing 
the sprite's pointer to switch through a series of shapes provided for that 
sprites's animation (e.g. an explosion). Switching the pointer rather than 
Switching between sprites leaves the other sprites free for other uses. 
The sprite pointers are the last 8 bytes of unused screen memory (2040 
— 2047). If you move screen memory, the pointers will move with it (but 
not their contents). You must remember when setting up your sprite 
pointers that the pointer must point to the first byte within the sprite and 
that the value in the sprite pointer is the actual memory location of the 
sprite over 64. Therefore, the following formula applies: 

Location = Sprite pointer * 64 

Also if you are not using video bank #0 (default bank) then you must also 
add bank number * 16384 to the location. If you haven't switched video 
banks, then don't worry. 

Two important points to remember when choosing where to put your 
sprite data in memory are 1, its location must be a multiple of 64, and 2, 
check the memory map to make sure that you are only using spare 
memory. 


Turning Sprites On 
For a sprite to be displayed to the screen, it must be turned on. The 
memory location where the video chip gets its information on which 
sprites should be turned on and which should be turned off is location 
53269. The 8 bits within byte 53269 are labled from right to left 0 — 7. 
Therefore, if we label our sprites from 0 — 7 then we easily determine 
which sprites should be on and which should be off by the value 
contained in byte 53269. The way that the on/off status of each sprite is 
determined is a follows: 
A 1 inthe bit corresponding to the sprite determines that the sprite should 
be displayed (turned on) and a 0 determines that the sprite should not be 
displayed (turned off). 
eg 76543210 

11010111 = 215 


therefore the statement POKE 53269, 215 would supply the video chip 
with the following information: 

Sprites 7, 6, 4, 2, 1 and 0 are to be turned on. 

Sprites 5 and 3 are to be turned off. 

To turn on a single sprite without effecting the others, use the following 
statement: 

POKE 53269, PEEK (53269) OR (2 : SN) 

where SN is the sprite number (0 — 7) 

To turn off a single sprite without effecting the others, use the following 
statement: 

POKE 53269, PEEK (53269) AND (255—2 t SN) 
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Sprite colour 

High resolution (single colour) sprites can be any one of the 16 colours. 
The colour of each sprite 0 — 7 should be POKEd into their respective 
colour registers, memory locations 53287 — 53294 (see video register 
map). Each pixel turned on within the sprite will be displayed in the colour 
determined by the sprite's colour register. Each pixel turned off will be 
displayed in the colour behind the sprite (i.e. it is transparent). 


Multicolour Sprites 

In multicolour mode, it is possible to have four different colours in each 
sprite. Though, as with multicoloured characters, multicoloured sprites 
have only half the resolution of single coloured sprite (ie. pixels must be 
displayed in pairs). The following table gives the colours determined by 
each bit-pair combination. 


Resultant Colour 


Transparent (screen colour) 

Sprite multicolour register #0 (location 53285) 
Sprite-colour register 

Sprite multicolour register #1 (location 53286) 


The register that holds information on which sprites are multicolored and 
which sprites are not is mapped to location 53276. 

To set a sprite to multicolour, use the following statement: 

POKE 53276, PEEK(53276) OR (2 + SN) 

where SN is the sprite number (0 — 7). 

To switch a sprite out of multicolour mode, us the following statement. 
POKE 53276, PEEK (53276) AND (255 – 2 + SN) 


Expanding Sprites : 

Sprites can be expanded vertically, horizontally or both. A sprite is 
expanded by putting 2 pixels in place of 1 and 2 blanks in place of 1 inthe 
direction of expansion thus giving a 2X expansion. To expand a sprite 
horizontally, the corresponding bit in location 53277 must be set to 1. To 
unexpand the sprite, the bit must be set to 0. Vertical expansion is done in 
the same way using location 53271. The POKE statements to control 
expansion and unexpansion of sprites are as follows: 

Horizontal expansion 

POKE 53277, PEEK (53277) ОВ (2 + SN) 

Horizontal unexpansion 

РОКЕ 53277, РЕЕК (53277) AND (255 -2 t SN) 

Vertical expansion 

POKE 53271, PEEK (53271) ОН (2 + SN) 

Vertical unexpansion 

POKE 53271, PEEK (53271) AND(255 -2 t SN) 

where SN is the sprite number from 0 — 7. 


93 


Sprite Movement 

Sprites are moved around the display by changing the values in each 
sprites's horizontal and vertical position registers. These registers are 
mapped to memory location 53248 to 53263 and a most-significant-bit 
(MSB) register at location 53264. The MSB register is used to rectify the 
problem of horizontal screen width. The MSB register works as follows. 
In order to gain pixel by pixel movement, the horizontal position register 
needs to be able to hold values from О to 299 (screen width). A single 
register can only hold values from 0 to 255 therefore we need at least one 
more bit to handle values up to 299. An extra bit (9th bit) would allow us 
control over positions O to 511. This is the purpose of the MSB register. 
The bits in the MSB register correspond to the sprite number. (ie. bit O for 
sprite O, bit 1 for sprite 1, etc.) A register map of all sprite positioning 
registers is as follows: 


Use of Register 


prite 0 X position 
Sprite O Y position 
Sprite 1 X position 
Sprite 1 Y position 
Sprite 2 X position 
Sprite 2 Y position 
Sprite 3 X position 
Sprite 3 Y position 
Sprite 4 X position 
Sprite 4 Y position 
Sprite 5 X position 
Sprite 5 Y position 
Sprite 6 X position 
Sprite 6 Y position 
Sprite 7 X position 
Sprite 7 Y position 
Sprite (0 — 7) MSB register 


Note that horizontal positions 24 and 344 are the left and right 
boundaries of the screen. Sprites continue to move outside this range but 
cannot be seen. 


It's about time we had a look at one of these sprites. Study the following 
program and its comments. Type it in and run it. 


1 REM жжж SQUARE Жжжж 
5 REM *CLEAR THE SCREEN TO BLUE WITH A BLACK 
БОКПЕК 


10 РБІМТЕНЕЖС 1472:РОКЕ58З®50,0@:РОКЕ5З281,6 
15 REM «SET SPRITE-POINTER #8 TO POINT TO 
LOCATION 13ж54=832 

тё POKE 2048,13 

25 REM «CREATE Я SQUARE SPRITE ІМ MEMORY 
LOCATIONS 832 TO 832+63 

30 FOR MEM=832 TO 834:РОКЕ MEM,255! NEXT 
48 FOR МЕМ=835 TO 888 STEP З 

50 POKE МЕМ, 128 :РОКЕМЕМ+1,Э:РОКЕМЕМ+2 , 1 
60 NEXT МЕМ 

70 FORMEM=892T0894 :РОКЕМЕМ, 255 : NEXT 

75 REM ЖЅЕТ BEGINNING OF VIDEO CHIP 

eo VIDEO=53248 

25 REM | xTURM QN SPRITE #0 

ЗӨ POKE VIDEO*21,1 

35 REM «CHOOSE THE COLOUR WHITE FOR SPRITE #8 
100 POKE VIDEO+39, 1 

109 REM ЖМОЧЕ SPRITE ACROSS SCREEN 

110 Yz100 : POKE VIDEO*1,Y:FOR Х=0 TO 347 
115 REM xCALCULATE X-POSITION AND MSB 

128 МЕБ-ІМТ(Х/9560 : ХРчаХ-256ж/45В 

138 POKE VIDEO*«O,XP: POKE VIDEO+16,MSB 
149 MEST X 


Run the program and you should see a square sprite float across the 
screen. 

е To expand the sprite in the horizontal and vertical directions before 
moving, add the following line: 

105 POKE VIDEO + 29, 1 : POKE VIDEO + 23, 1 

and run the program again. 

The following program allows you to use the cursor keys to draw a sprite 
by editing DATA statements. Type RUN 1, then use the cursor keys to 
move around the DATA statements. Use the shift Q character to signify a 
pixel-ON and a full-stop to signify а pixel-OFF. When you have finished 
drawing your sprite, move the cursor to the top of the screen, then keep 
hitting the RETURN key until you have entered all of the DATA 
statements. Now type RUN, and the program will generate the sprites 
and the DATA statements needed to generate that sprite. To store these 
DATA statements, use the same method as you used on the last set of 
DATA statements. 


© GOTO10 
1 PRINTCHRS( 147) : POKES3258,0:LIST2S9-50 
10 PRINTCHRSX 147): FORI=@TO6G3:POKESS2+1,0: NEXT 
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15 POKES3280,6:POKES53281,6 

20 GOTO 68 

ea REM...01e8e345678901834567890123 
30 DATA "e..«4000000000000000009060" 
зі DATA "ee..oe800009000900006000000" 
32 DATA "а.в..еесевсгеввеееевеееев" 
зз пата "@..9.. ssesenenaseseesase” 
за сата "б...ө..всеясееевееевееев" 
35 DATA "S8....9..000008800008000080" 
E САТЕ "€.....9..000060000065090900" 
Y 


DATS "9......9..0908908008095008000" 
38 пата "g.......8..00900900580090" 
за DATA "9........8..8080000000000" 
42 DATA "$.........9..90080006080" 
41 CATA "..........0..9800000000" 
42 рата "G...........8..0080908080" 
43 JATA "82222224254 = о. . 60000000" 
ла пате "S.............0..0000000" 


45 DATA 8..........»....бС..бвіөәбзеев" 
36 рата "8,..............Сө.,. 000960 " 


” DATA “ө....... $9555 0.. 80080" 
43 BATA Е e. " шп 8 S9 а а B à 8 5S а 9 а 8$ ве а. а eon" 
аз DATA ч ө. " 9 8 5» B 9 B8 аз B а а оо 8 à э e. a ee" 


Se NATA "eeteecescseoes200090080..9" 

58 '"!s532848:POKEV*16,1: POKEV*1,50 :РОКЕУ+21, 
1: POKEV*39,3:POKE2040,13 

70 POKEV+23,1:POKEV+29, 1 

за FORIsSOTO2SO:PRINT1000-*1;"DATAà"; :READAS: FORK= 
ВТОЕ : T=G:FORJ=OTO? -B=0 

80 IF МІПФВ%,7%Қж8%1,12-" ф'"ТНЕМВ=1 

180 T=T+Be2t¢ ?-JO : NEXT: PRINT T;",": :POKE 832+ 
1*3+К,Т:МЕХТ:РАК ИМТ "№ "NEXT 

110 END 

2080 PRINTCHRSI1S825:END 

9000 SAVE"S@:SPRITE",8 

9010 VERIFY"SPRITE",S 


SPRITE DISPLAY PRIORITIES 

Sprite priority determines if the sprite should appear in front or behind 
another background. If the background is another sprite, then the priority 
is fixed by the sprite’s sprite number. Sprite 0 has the highest priority, 
sprite 1 has the next priority, and so on, up to sprite 7. For example, if 
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sprite 0 and sprite 7 are positioned so that they cross each other, sprite 0 
will be in front of sprite 7, though you would be able to see sprite 7 through 
sprite О (unless of course sprite 0 was a completely filled square). Sprite 
to background priority is more flexible in the way that each sprite can be 
Set with priority above or below the background. The sprite to 
background priorities are controlled by the sprite priority register 
(memory location 53275). A 1 in the bit number corresponding to the 
sprite number will set that sprite with a lower priority than the 
background. A 0 in this bit position will give the sprite a higher priority 
than the background. By moving sprites back and forth over other 
objects, at the same time changing the sprite-background priorities, it is 
possible to make it look as if the sprites are moving in front and behind the 
object thus creating a three dimensional effect. 


The following program overlays 8 sprites to demonstrate sprite priority: 


5 КЕМ ж DEMONSTRATING EIGHT SPRITES ж 
10 РОКЕ5З280 „6: РОКЕ5З28 1,0 

20 PRINT CHR#( 147»; "CREATING SPRITES" 
30 POKE 52,62 :POKE 56,52 :Р=248 

да FOR MEM=2040TO2047:POKEMEM,P:P=P+1 
50 МЕХТ МЕМ 

Si os 

БӨ BYTE=27e2 

70 FOR SNO TO 7 : PRINT SN 

ЗВ LOC=PEEK( 2049 +54) *64 

90 ВҮТЕ =ВУТЕ/Р : B=BYTE: ROW=8 

100 FORMEM=LOCTOLOC+63STEP3 

11а IFSM< -ЭТНЕМ140 

120 ROW=ROW+1: T=( ROW-SN-39/4:B=0 

130 IF ЦПИСТ>=Т THEN В=255 

140 FOR COLzOTO2:POKEMEM-*COL ,B:NEXT COL 
150 NEXT MEM,SN 

155 : 

160 VIDEO=S3248:A=150:8=0 

170 POKE VIDEO*21,255:POKE VIDEO*28,255 
172 POKE VIDEO*37?7,1:POKE VIDEO+38,1 

180 CzO:FOR R=39 TO 46:C=1 

190 POKE VIDEO*R,C:PRINTCHRS$C 1472: МЕМТЕ. 
260 I=A:A=B:B=1:D=SGNC B-A)? 

210 FOR SN=7 TO Ө STEP-1 

215 Z=1140SN>3) ж A=) 

220 PRINT СНЕ&‹ 1472; "SPRITE";SN 
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238 SAXsVIDEO*SN*2:SYzSx*1 

248 Yzh-D*Z:FORZ-RA*zZTOB*2STEFD: Y=Y+D 
250 POKE SH,X:POKE SY,Y 

гед NEXT Х,5М 

270 FOR PAUSE-1TO2O200:NENT 

сезе GOTO 209 


Sprite Collisions 

Sprite collisions are detected by the computer and collision information is 
stored in location 53278 for sprite to sprite collisions and location 53279 
for sprite to another background collision. The bit set to 1 in each of these 
registers corresponds to the sprite involved in the collision. The bit stays 
set until the register is read (PEEKed). So if the collision information is to 
be used more than once per collision, it would be a good idea to store the 
value into a variable. Also, programs that use the sprite collision registers 
should include in their initialization a PEEK of each of these registers to 
clear them of previous collision data. 

Note: A bit pair 01 in a multicoloured mode will not be detected in a sprite 
to background collision, even though it can be seen on the screen. So, for 
example, if you wish to have objects that should not cause a collision 
(e.g. a cloud) then they should be coloured by using bit pair O1 
(multicolour register #01). 


SELECTING A VIDEO BANK 

Even though there is 64K of RAM (Random Access Memory) available, 
the video chip can only access 16K at any one time. The 16K block of 
RAM that your program will use depends on your particular application. 
The reason for this is that each of the 16K blocks have different memory 
allocations to character generation. Then there is the problem of BASIC 
residency. The following memory block descriptions should make this 
clear. 


Memory | RAM seen by Character Memory 
Block Video өсті Set Used Usage 
ROM System variables and 
096—8191 default screen memory 
81 S air 6383 білед | 
Basic programs and variables 
16384—32767 | апу т multiple (2048— 40959) 
(User generated) 
32768— 36863 ROM 
and 6864—40959 
40960—49151 ET 


any e ке 
(User generated) 


1 
| String space 
т 


Two more things to remember when choosing a memory block аге:- 

e Sprites take up 64 bytes and their position in memory must be a 64 
byte multiple. 

e The high-res screen takes up 8K and its position in memory must be 
an 8K multiple. 


As seen from the previous table, the more memory your BASIC program 
takes, the further up memory you will have to put your sprite data, hires 
screen and alternate character set if any of these are used; otherwise 
use the default screen at location 1024 — 2047. 

The bank select bits that are used to select which of the four banks of 16K 
memory you wish the video chip to get all of its sprite data, character set 
and screen information from are bits 0 and 1 of location 53576. However, 
before changing the contents of this location to choose your video bank, 
you must first set bits O and 1 of location 56578 to 1. The BASIC 
statement to do this is as follows: 

POKE 56578, PEEK (56578) OR 3 

The BASIC statement to select the video bank is as follows: 

РОКЕ 56576, (PEEK (56576) AND 252) OR (3 — BANK) 

where the value of BANK depends on the following table: 


TARS VIC -II CHIP RANGE 


0 — 16383 (Default bank) 


16384 — 32767 
32768 — 49151 
49152 — 65535 
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VIC-Il CHIP REGISTER МАР 


мей БЕС ЕЈ ПИ ЕЕ БЕН КЕНЕН 


Sprite 0 
Sprite# 0 
Sprite# 1 
Ѕргіей 1 
Spritest 2 
Sprite# 2 
Sprite# 3 
Sprite# 3 
Зрте» 4 
Sprite# 4 
Sprite# 5 
Sprites 5 
Sprites 6 
Sprites 6 
Sprites 7 
— 7 


— 
owoco-100 56095 = 


- 
-. 


GRON 


16 |_Spmaa? | Sprte #6 | Spe #5 | ре #4 | 


x — position 
y — position 
х — position 
y — position 
x — position 
у — position 
x — position 
y — position 
x — position 
y — position 
x — position 
y — position 
х — position 
y — position 
x — position 


— дом кеші 


| Spree! | Spro #0 | MSBots- 


posdion 


17 NEM. I WE GR рс тшс Mode y- seror 


21 | — Эр е^! | Somere | Зоне | бопе еа | бриге | Бечега | Sorte ot | Soria #0] 


18 Raster register 

19 Light pen — x 

20 zem pen — y 

22 un 
23 Spee #7 | Sprite еб | Sprte #5 
24 Screen location 
25 IRQ mE — 
26 IRQ — == 
27 Spree #7 | брножб | Sprite #5 
28 Sorte #7 | Sprte #6 | Spree #5 
29 Sorte #7 | Sprite еб | Spnte #5 
30 Sprtew#? | Әрте еб | Sprte #5 
31 Sorte #7 | Spete еб | Spree ө5 
32 Screen border Colour 

33 Background Colour #0 

34 Background Colour #1 

35 Background Colour #2 

36 Background Colour #3 

37 Sprite multicolour #0 

38 Sprite multicolour #1 

39 Sprite 40 Colour 

40 Sprite #1 Colour 

41 Sprite #2 Colour 

42 Sprite #3 Cotour 

43 Sprite #4 Colour 

44 Sprite #5 Colour 

45 Sprite 46 Colour 

46 Sprite 47 Colour 


Muri 
colour 


Spe 24 


Spnte #4 
Sante #4 
Sprte #4 
Sorte #4 
Serte #4 


соп pum “onzamat ES 
меди" 
Sorte #3 | Sprte #2 ens #1 | Spree #0 
— Character Ване — = 
юм 
pin i у (шіт Rastor 
Ug Spr tito Raster 
pen Spates Spr е}, Sprite си! 
Sorte #3 | Spite #2 | Sponte #1 Some #0 
Sprte #3 | брис #2 | Sprte st Sprto #0 
Spe #3 | Spree #2 | Sorte at | Sprae 20 
Spete #3 | Spies? | Sorte et Sprag #0 
Sprite #3 | Spete #2 | Sprte е: | Sorte #0 
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Sprite епапе 

Muli colour х 56109 
Sprite y - expand 

Interrupt "00510: 

мегир enade 

Spe — background priority 
Sorte muncotour select 
Sprite x - expand 

Spnte to Sprite collision 
Sprite то background союл 


СНАРТЕН 6 


MACHINE LANGUAGE PROGRAMMING ОМ 
THE COMMODORE 64 


In this chapter, the following topics will be covered: 


MICROPROCESSOR & MACHINE LANGUAGE 


— Binary & Hexadecimal Numbering System 
— Registers & Addressing 

— Machine Code & Instruction Mnemonics 
— Simple Machine Language Programs 


MACHINE LANGUAGE PROGRAMMING ON COMMODORE 64 
— Program Entry 

— Program Execution 

— Some Commodore 64 Useful Routines 


MEMORY MAP & MANAGEMENT 
— Memory Map & 'Shadow Zone' 
— Memory Management 

— Some Memory Configurations 


COMMODORE 64 KERNAL 


— Concepts of Kernal & Operating System 
— Power-up Instructions 

— Using Kernal Routines 

— Simple Programs that Call Kernal Routines 


MICROPROCESSOR & MACHINE LANGUAGE 


INTRODUCTION 


A microprocessor is the central processing and control unit of a 
microcomputer system just like the brain of a human being. As with any 
other electronic devices, the only way to communicate with a 
microprocessor chip is via electronic signal pulses. There are certain 
combinations of pulses that the microprocessor can understand which 
form the basis of a Machine Language. A group of all the ‘words’ that a 


microprocessor understands is called its instruction set. 


Different microprocessors speak different machine languages. In a 
Commodore 64, the central microprocessor unit is named 6510. For 
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those of you who һауе heard of the famous 6502 which сап be found 
inside Apple, Atari and other Commodore models, 6510 is its cousin. It 
has the same instruction set as its better known relative. The only major 
difference is that 6510 has an inherent І/О port which makes it 
impossible to use the first two bytes of RAM. 


BINARY & HEXADECIMAL NUMBERING SYSTEM 


In the eyes of a microprocessor, an electronic signal can only have either 
one of the two states — a ‘0’ or a 1”. As ме are going to work with a 
microprocessor, we had better learn its numbering system, called binary, 
in which every number is made up of a bunch of ‘0’ bits or 1' bits (BIT is ап 
acronym for Binary digiT). The 6510 processor is an 8-bit machine which 
means all the numbers it knows range from 00000000, 00000001, 
00000010, ... upto 11111111. 


For those of you mathematicians, the largest number is: 

Tx 27 + 1x26 + 1х25 + 1х24 + 1х 23 + 1х22 + 1х2' + 1x29 = 255 
іп our human decimal system. The conversion between binary and 
decimal numbers is by no means a trivial exercise. (Can you tell 
immediately whether 10111010 is larger than 180?) An intermediate 
numbering system was invented to facilitate conversion to and from 
binary numbers and on the other hand save the finger-counting feats. It is 
called hexadecimal which means 1 digit has 16 counts.Conversion with 
binary numbers is simple because this one digit can represent all 
combinations of 4 bits. 


Conversion Table of Hexadecimal, Binary and Decimal 
Note: 6502 programmers' % $ convention of prefixing binary and 
hexadecimal numbers. Decimal numbers do not have a prefix. 


Decimal Count Hexadecimal Digit 


©з 
e 


со со ч о) сл о -> О 


1 
2 
3 
4 
5 
6 
7 
8 
9 
A 
B 
C 
D, 
E 
F 
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1. HEXADECIMAL — BINARY CONVERSION 
It is a straight-forward table look-up exercise once you remember 1 
hexadecimal digit is equivalent to 4 bits. Always start conversion from the 


least significant digit (ie. rightmost digit). 


Example: 
% 1011010111 1000 
fr ¢ ¢ 
$ 2р 7 8 


2. HEXADECIMAL — DECIMAL CONVERSION 


Conversion with decimals requires more arithmetic 

a) Hexadecimal to Decimal 

Look-up the decimal equivalent of each hex. digit before multiplying it by 
its ‘weight’ factor. 

Example: 
$ 2 


y 4 ұ \ 
82х163 + 13x16? + 7х16 + 8 = 11640 


It might be slightly simpler to work from the most significant digit (ie. 
leftmost digit) in this case:- 

(i) multiply the digit by 16 

(ii) add the digit to its right 

(iii) iterate from (i) unless it is the last digit. 

Example: 
$ 2 


((2х16+13) x 16+7) x 16+8 = 11640 


D 7 8 


D 7 8 


b) Decimal to Hexadecimal 
Divide the decimal number by 16 repeatedly. Convert remainders to hex 


representation. 

Example: 2 45 727 
жасы 11640 
32 _64 112 
13 87 44 
2 _80_ 32 
D 120 
7 112 
8 

11640  $2D78 


3. DECIMAL — BINARY CONVERSION 


This is best done by converting the original number to its hexadecimal 
equivalent and complete the conversion to the desired number system. 
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REGISTERS & ADDRESSING MODES 


A. 6510 PROCESSOR REGISTERS 

Registers are the actual working vehicles inside a microprocessor. They 
hold the crucial data for processing. All 6510 registers except one are 
8-bits wide. The exception is the Program Counter which is 16-bits wide 
enabling the processor to address 216 or 64K bytes of memory. 


1. ACCUMULATOR (A) 

The Accumulator is responsible for data manipulations such as memory 
load/store, addition/subtraction and other logical operations. Hence, it is 
often regarded as the most important register. In fact, if there ever exists 
a microprocessor with 2 registers only, one of them must be the 
accumulator. 


2. X and Y INDEX REGISTERS (X, Y) 

The primary function of an index register is to point at a memory location 
for data manipulations. Other uses of an index register include temporary 
storage, counter and memory load/store. 

The 6510 has 2 index registers which makes indexing very efficient. 
They differ slightly from each other in the most advanced addressing 
modes. X index register specialises in Index Indirect addressing while Y 
index register is for Indirect Index addressing. This will be explained in 
detail when we talk about Addressing Modes later on. 


3. STACK POINTER (SP) 

A stack is a very important data structure in microprocessor 
programming or in fact in any computer. It is a block of memory where 
temporary storage is available. Data are stored on a Last-In, First-Out 
(LIFO)basis. You can imagine it as a stack of plates, where the one оп 
top is the one most recently added and will be the first one to be removed. 
The Stack Pointer is an 8-bit register that keeps track of the next 
available location or the top of the stack. In 6510, the stack is assigned to 
page 1 of memory (ie. address $0100 — $01FF) so that the high order 
address is always $01. The stack pointer is initialized at $ЕР and 
decrements towards $00 when something is pushed onto the stack. 

The stack is used by the processor intrinsically to store the return 
address when a subroutine is called or when an interrupt occurs. It can 
also be used by programs that require data storage/retrieval in a LIFO 
fashion. 


4. PROCESSOR STATUS REGISTER (PS or SR) 


The Process Status Register is 8-bits wide and consists of 7 flags which 
indicate various status of the processor. 
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bit 7 bit O 
м]у] cS aa |c 


Processor Status Register Flags 


a) Negative or Sign Flag (N) 

— Set when the result byte of an operation has its bit 7 set (showing a 
negative number in 2’s compliment representation) 
b) Overflow Flag (V) 

— Set when an operation results in a carry from bit 6 into bit 7 (showing 
an overflow in case of 2's compliment addition/subtraction) 
c) Break Flag (B) 

— Set when an interrupt is caused by a BRK instruction (not by a 
hardware interrupt) 
d) Decimal Flag (D) 

— Set to let the processor operate in decimal of BCD mode (not binary 
mode) 

е) Interrupt Disable Flag (1) 

— Set to disable any interrupt from hardware interrupt request. 
f) Zero Flag (Z) 

— Set when an operation results in a zero byte or equality in a 
comparison 
g) Carry Flag (C) 

— Set when an operation results in a carry/no-borrow in an addition/ 
subtraction. It also serves as the 9th bit extension of the accumulator in a 
shift/rotate operation. It is sometimes used as a user flag because it is 
easily programmable and does not have any effect on most operations. 


5. INPUT/OUTPUT PORT 

This unique І/О port of 6510 actually has 2 registers. At address $0000 is 
a Data Direction Register which controls the direction of traffic of the 
individual I/O lines. At address $0001 is the Data Register or the port 
itself. 


6. PROGRAM COUNTER (PC) 

The Program Counter is the only 16-bit register in the processor. Its sole 
function is to keep track of where the program is heading. It always points 
at the memory location from where the processor fetches its next 
instruction. Remember the processor with only 2 registers? A program 
counter is the other crucial register besides an accumulator. 


B. ADDRESSING MODES 


Addressing modes are the various fashions in which the processor 
specifies or addresses an operand. In 6510, there are 9 addressing 
modes, some of which have several names:- 
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— implied, implicit or intrinsic addressing (including accumulator 
addressing) 

— immediate addressing 

— absolute, absolute direct or extended addressing 

— zero-page or zero-page direct addressing 

— relative addressing 

— indirect addressing 

— indexed addressing (including zero-page indexed addressing) 

— indexed indirect or pre-indexed indirect addressing 

— indirect indexed or post-indexed indirect addressing 


1. IMPLIED ADDRESSING (INCLUDING ACCUMULATOR 
ADDRESSING) 

Implied addressing is used by single-byte instructions to operate on 
registers. Operands need not be specified; they are implied by the 
instructions themselves. Instructions using this addressing mode include 
register-register transfers, status flags set/clear, stack push/pop, etc. 
Example: 

TAX — transfer accumulator to X index register 

CLC — clear carry flag 

RTS — return from subroutine (modifies SP and PC) 


2. IMMEDIATE ADDRESSING 

The operands, mostly 8-bit constants, follow the instruction opcodes 
immediately. Instructions that use this addressing mode include register 
loads, arithmetic/logical operations and comparisons. 

Example: 

LDX #255 — load X index register with 255 or $FF 

AND #$80 — logical AND accumulator with bit 7 only 

СРУ #0 — compare Y index register with О 


3. ABSOLUTE ADDRESSING 

With this addressing mode, the 2 bytes that follow an opcode specify the 
effective address of the operand. All instructions that work with an 
operand in memory can use this addressing mode. 

Example: 

ADC $1100 — add contents of memory location $1100 to accumulator 
EOR $D004 — logical! exclusive-OR accumulator with contents of 
location $D004 

JSR $1234 — jump to subroutine at $1234 


4. ZERO-PAGE ADDRESSING 


This is similar to absolute addressing except that the operand lies in page 
О ($0000 — $00FF). The instruction will be 2 bytes long only because 1 
byte is sufficient to specify any location in the page 0. Variables that are 
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often manipulated by а program should be stored in page О to take 
advantage of the memory efficiency of this addressing mode. 
Instructions that use this addressing mode are similar to those which can 
use the absolute addresing except the 2 jump instructions — JMP and 
JSR which always require a 16-bit address. 

Example: 

STY $12 — store Y index register at $0012 

INC $20 — increment memory location at $0020 (by 1) 


5. RELATIVE ADDRESSING 


Relative addressing is used exclusively by Test and Branch instructions 
which are 2 bytes long. The first byte is an opcode which tells what test to 
perform. The second byte is a signed offset or relative count which tells 
how many bytes to branch forwards or backwards if the test succeeds. 
Example: 

BNE —128 — branch backwards 128 bytes if Zero Flag is clear. 

BMI +127 — branch forwards 127 bytes if Negative Flag is set 

(Note: —128 and +127 are maximum branch limits) 

BCC 0 — no effect ; always proceed with next instruction regardless of 
the test result. 


6. INDIRECT ADDRESSING 


This addressing mode is only used by 1 instruction in 6510 — JMP. With 
this addressing mode, the destination of the jump operation is secified by 
2 consecutive memory locations whose address follows the JMP 
opcode. Such locations that store destinations are known as Vectors. 
Example: 
JMP ($0300) — jumps to location whose address is found in memory 
$0300 (low order) and $0301 (high order) 

[] LI 


Jump 

$AC54 $6C | Indirect 4$3000 | $32 | low byte of destination address 

$00 | using / $3001 | $D4] high byte of destination address 

vector ,/ 2 

Ргодгат $30 | $3000 mts 

actually -—— di 

jumps here | le 

$0432 ! и 


7. INDEXED ADDRESSING (INCLUDING ZERO-PAGE INDEXED 
ADDRESSING) 

The effective address of the operand is determined by adding the 
contents of the index register (X or Y) to the base address. This base 
address can be 1 byte or 2 bytes long, depending on whether it is in page 
O or not. This addressing mode is useful when a range of memory 
locations (less than 256 bytes) is processed sequentially such as a block 
move. 


107 


Ехатріе: 
LDA $10,X — load accumulator with contents of address $10 + X 
STA $0310, Y — store accumulator at location Y bytes away from $0310 


8. INDEXED INDIRECT ADDRESSING 

This addressing mode only works with the X index register and a table of 
indirect pointers in page O. The effective address of the operand is found 
in 2 consecutive memory locations whose address is the sum of the 
content of X index register and the base address in page О. This 
addressing mode is useful when you have several possible operands 
which are pointed to by a table of indirect pointers and the X index 
register can decide which one in the table. 


(Note: Remember that each entry of indirect pointers is 2-bytes long and 
hence the X index register should generally be a multiple of 2) 
Example: 

LDX #2 

LDA ($40,X) — load accumulator with a memory byte whose address is 
specified in $42 (low order) and $43 (high order) 


X A 
LDX #2 
LDA ($40,X) 2 ] 
[02] < 


9. INDIRECT INDEXED ADDRESSING 

This addressing mode only works with the Y index register and a table of 
data whose base address is stored as pointers in page О. The effective 
address of the operand is the sum of the content of the Y index register 
and the base address pointer found in 2 consecutive memory locations in 
page O. This addressing mode is useful when you have several tables to 
process and their base addresses are stored as page 0 indirect pointers. 
A block move can be done very efficiently using this addressing mode. 
Example: 

ШҮ #3 

LDA ($10), Y — load accumulator with the 4th entry of atable whose base 
address is stored in $10 and $11 (low, high order) 


Y 
шүязГ 2 ] 2] м | | 
оло | s ] [7*7 35 
1 
Е ки М т КЕТСЕ 
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МАС 
HINE CODE AND INSTRUCTION MNEMONICS 


Al the machine code Instructions of an 8-bit microprocessor are made up 
of bytes. In 6510, the instructions are 1-byte, 2-bytes or 3-bytes long. To 
a microprocessor, all instructions are purely numbers but it will be 
extremely difficult for a human to write a program in a series of numbers. 
Mnemonic words are invented to help the programmers memorise each 
instruction. 

For instance, 


A9 
LDA #0 00 
STA $0001 is more meaningful than 8D 
01 
DO 


The 6510 instruction set can be classified into 4 groups by functions 
— data transfer 

— arithmetic and logical operations 

— program control 

— miscellaneous 


MNEMONIC CONVENTIONS 


Hegisters 
A - Accumulator P — Processor status register 
X — X index register S — Stack pointer 


Y — Y index register 

Processor Status Flags 

C — Carry | — Interrupt disable 
D — Decimal V — oVerflow 


A. DATA TRANSFERS 
1. Register — Register Transfer 
Format: Tpq — Transfer register p to register q 
Instructions: TAX, TXA, TAY, TYA, TXS, TSX 
2. Register — Memory Transfers 
Format: (Ор — оар register p with memory 
STq — STore register а into memory 
Instructions: LDA, LDX, LDY 
STA, STX, STY 
3. Register — Stack Transfer 
Format: PHp — PusH register p onto the stack 
PLq — PulL register q off the stack 
Instructions: PHA, PHP 
PLA, PLP 
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B. АНІТНМЕТІС AND LOGICAL OPERATIONS 

1. Add/Subtract with Carry/Borrow 
Instructions: ADC, SBC 

2. Increment/Decrement 
Instructions: INX, DEX, INY, DEY (index registers) 
INC, DEC (memory) 

3. Logical AND, OR and Exclusive-OR 
Instructions: AND, ORA, EOR 

4. Comparisons 
Instructions: CMP, CPX, CPY — comparisons with A, X, Y 
BIT — bit-to-bit AND with A 

5. Shift/Rotate 


с 7 0 
Instructions: ASL — Arithemetic Shift Left 2—0 4-о 
7 0 С 
LSR — Logical Shift Right oC JL) 
С 7 0 
ROL — RCOtate Left -——LlIL -- 1] 


0 
ROR — ROtate Right 
C. PROGRAM CONTROL 
1. Test and Branch 
Instructions: BPL — Branch if PLus (N flag clear) 
BMI — Branch if MInus (N flag set) 
BNE — Branch if Not Equal zero (Z flag clear) 
BEQ — Branch if EQual zero (Z flag set) 
BCC — Branch if Carry flag Clear 
BCS — Branch if Carry flag Set 
BVC — Branch if oVerflow flag Clear 
BVS — Branch if oVerflow flag Set 
2. Unconditional Jump 
Instruction: JMP 
3. Jump to and Return from Subroutine 
Instructions: JSR, RTS 
4. Software Break and Return from Interrupt 
Instructions: BRK, RTI 


D. MISCELLANEOUS 
1. Flag Clear/Set 
Format: CLf — CLear flag f 
SEf - SEt flag f 
Instructions: CLC, CLD, CLI, CLV 
SEC, SED, SEI 
2. No OPeration 
Instruction: NOP 
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6510 MICROPROCESSOR INSTRUCTION SET 


branch on С--0 
=1 

branch on 2=1 

AxM 

branch on М=1 

branch on 2=0 

branch on N=0 


branch on У-0 
branch on V2 1 


4C 
ra 


|2ғех аға (мах) (коју | ве. | imo) 
[#=2| #22] #22 [е=2[я=з 


[e| мм | zeo] авз | assx| авз 2-Рб.Х]2-РО.У] оној (коју | ner | mol Processor Status 
Past] #=2| #=2| 923) ж=з] аса] #=2 | sze) я-2| жез | e-2| жез) N[V|-BBID[ 112] C | 


56 о) || | | | 
— | 
15 11 
— ШЕШЕН 
|| ||| | [У] | 
36 


(5),, +1—УРС 
А-М+С А 
1->С 


Accumulator 


A Mig 16-bit Operand in Memory — Subtract Г 

X X-Index Register (5) Орегапа Pushed on Stack A AND 1 Set to 1 

Y Ү-1пбех Register (S)-- 16-bit Орегапа PushedonStack у ОЯ о Сеаюо 

Б S rocessor Status Register (5), Орегапа Popped off Stack X- Exclusive OR M; Memory Bit 7 
tack Pointer $)... 16-bit Operand Popped off Stack ) r Instruction ; 

PC — Program Counter С )+ + Add pe pp # Мо. of Bytes for Inst Ms — Memory Bit 6 

M Operand in memory 
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SIMPLE MACHINE 
LANGUAGE PROGRAMS 


Here are a couple of simple machine language programs to get yourself 
familiar with the instructions and different addressing modes of the 6510 
microprocessor. 


A. Рае A BINARY BYTE VALUE ТО 2 ASCII HEXADECIMAL 
DIGITS 


This program converts a binary value to 2 hexadecimal digits in ASCII 
values and puts them in a buffer. It illustrates the uses of some data 
manipulation instructions and the са па of subroutines. 


Main conversion program. BINASC 
AG га CO binasc lda binary get binary 
43 pha isave it 
ve JA isr a 
* ап Isr a 
in lsr а right shift 4 tines 
ЗА lsr а sto yet high nibble doun 
2.5 59 20 Ca jer heaasc convert tu 11536011] valuu 
a АС 2B CO ldy bufptr i 
за 2C СӘ sta buff,; put ал buffer 
4 са iny bump butter Pointer 
i "8 Pla Jeet binarz азап 
+ 2З ӨР and #%0# Рок to get low nibble 
4. зе 20 CO Jsr heaasc jconver t to ASCII 
EN 39 >с CO sta butf,v ;put in buffer 
27 са nr 
у ac eB CO sty bufrptr update bulfer pointe 
(f БӨ rts 
convert 1 hexadecimal digit to ASCII zubroutine 
‹ са OA hexasc cmp пљда 20-97 
24 90 өз bcc hexal syes,add $30 onl: 
ids 18 cic ino,for f-F 
[4 69 07 adc #7 add 5872 пог 
һаха! 
24 вә pts 
sdata area 
"e binary -ds 1 
| bufptr .ds 1 
buff .ds 256 


To use ‘BINASC’, POKE the binary number to be converted into the 
location defined by BINARY. Call 'BINASC' by using SYS (BINASC) 
where BINASC - the address of the start of the machine code (e.g. 
49152 or 52000). 
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B. RETRIEVING А VARIABLE-LENGTH MESSAGE WITH AN INDEX 
This program retrieves a variable-length message (e.g. error message) 
from a table of up to 128 messages given its index (e.g. error number). An 
index table is kept at zero page pointing to the start of each message. 
The first byte of each message is actually its length. 


The two unique index addressing modes of the 6500 family processors 
are utilized here for illustration purposes 


АП РР CA retriv 1да index ?get index 
та ast а times 2 to access the 
зе tax ісоггес% 8 byte pointer 
As ға 192 < ixtbl,x) 2%аке first byte of message 
эг er га sta length jas length of message 
'set up pointers for retrieving actual message 
вз па ida ixtbl,x ¿init pointer at start 
вз AX sta msgptr 20% desired message 
RS AS 1да ixtbl*1,x 
25 пэ sta msgptre*i 
яп nj )d» иі start from actual message tex 
AF 3n СЯ idx bufptr Joutput buffer pointer 


¿move message to buffer using 
indirect index addressing 


В! 02 move lda 4(msgptr?,y retrieve message 
эп 2E CA sta buff ,х put in buffer 
ra iny 
ЕЗ іпх 
ег 8C CÓ dec length jfor its whole length 
Dn ве bne move 
ЗЕ Рр га $tx bufptr "update buffer pointer 
Rn rts 
data area 
index .ds 1 ?index no. (0-187) 
length .ds 1 message length counter 
bufptr ds 1 tbuffer pointer 
msgptr de 2 $message pointer (zero page) 
buff eds 255 #256 byte buffer 


. 
ғ 


l index table (zero page? 

ixtbl de 4 stable of addresses 
;0f msgi,msg2 and msg3 

7;table of variable length messages 


тоа 1 .by 9 'i/o error' 
mega by 12 ‘syntax error" 
ms a3 •бу 15 ‘buffer overflou' 


MON— SIMPLE MACHINE CODE MONITOR 


Purpose: to enable the user to examine and change the contents of 
memory displayed in hex. 


When the program is run the user is prompted for a start address. This 
may be entered in decimal or hex. Hex addresses are indicated by a $ 
immediately preceding the address, e.g. $D800. Following this, 200 
bytes, from the start address on, will be displayed. Cursor control keys 
move the cursor around the screen as usual. A RETURN keystroke will 
clear the screen and redisplay the start address prompt. Memory 
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locations are changed by changing the appropriate display. Only legal 
hex digits will be accepted. 


Where there are ROM/RAM overlays the ROM values will be displayed 
and the RAM values changed unless the ROM is switched out by the 
user. 

5 REM MACHINE CODE MONITOR 


1A 


д) 
JS 


їй c ©) dl 


D 
Ve 919 7) зоо э 


BA ға. қа 


2) ~ 
re aS d 


Ја de fy on 
[y r3 t-e {7 


9 OG 


r3 


д i) 79 
9 
Goo 


"3 


вото зая 
REM DEC TO HEX. CONVERSION 
НФ= " " 
VENR- INTC NR/ 168) #16 
Нана Y) +Н& 
МЕ = INTCNR/ 16> 

ТЕ ONR< > THEN 48 
RETURN 
REM HEX TO DEC CONVERSION 

NR =o 

FOR 1-1 TO LENCNR#) 

МВ = ASCE MIDSC NRE, J, 122-48) € NRX18? 
: NEXT: RETURN 

REM CRSR MOVE LEFT/RIGHT 

CAS=CA+MOVE 

REM DISABLE CRSR,PRINT,ENABLE CRSR 
WAITEET ,255, 1: POKE294 ,255:РОКЕВИАБ, 1: PRINTKS? 
: POKE2@4 ,0: RETURN 


РЕМ CRER MOVE UP 

17 C548 THEN RETURN 
S4=CA-B:SM=asht-dO:GOSUB 180:RETURN 

TF СҺ>58%41921 THEN RETURN 
SASCATESSM=Sit+do:GOSUB 180: RETUEN 

TF змгзазга THEN RETURN 

Т=гом- 1868 

RB Ти ida INTC T/40> THEN СА=Са+ і : 5М=5м+11 
:К$=' 


":GOSUB 188 : RETURN 


МОЧЕ =АВЗ‹ INTC SM2) =5М/2 > 

SM=SM+¢ 2 КМОМЕ › + 1 
T]MOVE #2+12KS=RIGHTS( "Ве", T) :GOSUB 
180: RETURN 


зға КЕМ CRZR MOVE LEFT 


а IF 22102] THEN RETURN 
f 


тезм- 1921 


A If TYa@sINT¢ 7/4602 THEN СА=СА-1:8М=$М-18 


:AÁ$-"IBEBMNENSEHRENEN":GOSUB 180:RETURN 
115 


MOVE = INTC 5М/2 >< >8М/Ё› 
ЗМ=5М+‹ ЗЖМОҸЕ ) -1 
T=ABS( MOVE x3*1:KS-RIGHTSX "НАИВ", T2 : GOSUB 
169: RETURN 

REM GET VALUE FROM SCREEN 


РОКЕ204 ,255:НБ=РЕЕК‹ SM-1) :LB=PEEKC 5М) : POKE204, 


ТЕ НВ>127 THEN HB=HB-128 

IF 87127 THEN LB=LB-128 

ЈЕ HBX43 THEN МЕСНЕ 64+HE) : 8070648 
NRS=CHR#( НВ» 

IF LB<48 THEN NR$sNRS4CHR$CB44LB?:GOTO 550 
МЕ =МЕ®+СНЕЖС1В) 

RETURIM 

REM POKE VALUE-2ND DIGIT CHANGED 

GOSUB 600:6050в 30 

РОКЕСа ‚МР 

IF CA=SA+4@QTHEN PRINT"Bi" : RETURN 

Т=‹ { СА-5А%12/8<  INTCCCA-S8 412/82) 

JF T THEN Ке= "В" : 60508 188:5М=$М+3:СА=СА+1 
: RETURN CSRHTUmes 7 
SM-SM*11:CA-CAh*1:K$2CHRSC1325*"BEBRBBRBI" 
:GOSUB 188 :RETURN 

REM CONVERT START ADDRESS 

IF LEFT$(SA$,120€2"$" THEN SA=VAL( SAS) RETURN 
NRS=MINS SAS,2>:GOSUB 90:SAsNR:RETURN 

REM SET UP CONVERSION ARRAYS 


гім Bf 2) 


FOR Ј=0 TO 8:06 JO-sJ:NEAT 
FOR Jz1? Та 22:00Ј2)=Ј-7:МЕХТ 
DIM HSC 150 


› FOR J=0 TO я:Н‹ J?zCHRS$CAB*JOSNEXT 


FOR Jz18 TO 15:Hs$X Ј)=СНЕ 55 +Ј ) : МЕХТ 
КЕМ INITIALIZATION 

PRINT"4":INPUT "START ADDRESS";SA$:GOSUB 800 
саг5а:5М=1031 

FOR J=@ TO 24:PRINT 
NR=SA+J*8:GQSUB 20 

PRINTRIGHTS( "дода" +Н4+ " иг); 
БОК К=0 TO 7: 
NRZPEEKCSA*Jt*K2:GOSUB 20 
:PRINTRIGHTSC "@O"+tHS+" ",4); 


116 


1228 NEXT K,J 

1230 REM hfe eae 

1240 PRINT "SWBRRRRI"; 

1250 POKEZO4,0 

!260 GET K$:1F Kf$-"" THEN 1260 О 
4272 IF Е GOSUB 200:G0T0 1268 “ны 
(230 IF K$="EP THEN GOSUB 380:G60TO0 12860 — 
1290 IF K£$-"MPTHEN GOSUB 4a@:GoTO 1260 
1327 IF K£-"ÜTHEN 60518 500:5070 12601058 
1310 IF ҚЖ-СНВФ( 13) THEN GOTO 1150 


1320 REM CHECK IF LEGAL HEX DIGIT 

1328 K=ASC K$) 

1340 IF К<45 OR KOTO THEN 1260 

ізсе IF X757 AND К<65 THEN 1269 

{269 GOSUS 138 

1378 IF SM/2e <> INTCSM/8? THEN E£M-SM*1:GOSUB 
606:GOSUB S80:POKECAH,NR:GOTO 1260 

1386 IF CA=SA+199 THEN K$-"lN":GOSUB 180:GOSUB 
600:5050В 80:POKECAh,NR:GOTO 1260 

1390 GOSUP 700:60Т70 1269 

enae PRINT"4":POKE2904,0 

2919 PRINTS ЈРЕЕКСЕ5 1); РЕЕКСЕЗа ); :GOTO 2610 
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COMMODORE 64 MEMORY МАР & MANAGEMENT 


MEMORY MAP & 'SHADOW ZONES' 


As you should know by now, the 6510 processor with a 16-bit address 
bus has a capability of addressing 64K bytes of memory. For any 
computer to operate, or almost any, this memory has to be a combination 
of ROM, RAM and І/О. With a clever design, Commodore 64 actually 
puts more than 64K of memory into the machine. 


Let us examine the memory map and find out how this is achieved. The 
64K memory сап be divided into 6 zones, 3 of which are ‘shadow zones’. 


In a shadow zone, more than 1 bank of memory exists. These memory 
banks can be switched in and out under memory management. 


Zone 6 : E000-FFFF 8K KERNAL ROM <> RAM 


Zone 5 : D000-DFFF 
Zone 4 : COO0-CFFF 
Zone 3 : A000-BFFF 
Zone 2 : 8000-9F FF 


m EN 


Commodore 64 Memory Map 
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ZONE 1 — 32K RAM 

The first 32K of memory is RAM and RAM only. No 'shadow' memory is 
hidden in this zone. However, addresses 0000 and 0001 are overridden 
by the 6510 internal 1/О port registers. Also, remember that Page 1 
($0100 — $01FF) is reserved as the processor stack. 


ZONE 2 — 8K RAM/'AUTO-START' EXTERNAL ROM CARTRIDGE 


Normally this is a RAM zone but will be overridden by a plug-in ROM 
cartridge. This external ROM cartridge plugged in can have an 'auto- 
start' feature to override the usual operating system. The 'auto-start' 
ROM executes its own codes on power-up if the first nine bytes (58000 — 
$8008) are as shown. 
"0" 

“в” 

“M” 

"Bp" 

“С” 

Warm Start 
vector 
Cold Start 
vector 


$8007 


$8004 
$8002 
$8000 


"Auto-start" ROM Header 


ZONE 3 — 8K (BASIC ROM/EXTERNAL ROM CARTRIDGE) — RAM 


Usually this is the BASIC ROM but will be overridden by the second half 
of a 16K ROM cartridge plugged in (A 16K plug-in ROM covers Zone 2 
and 3). A 'shadow' RAM exists in this zone which can be banked in and 
out under software control. A processor signal LORAM is used for this 
purpose. More on this later on. 


ZONE 4 — 4K RAM 


This 4K of RAM ina higher portion of memory is normally used as a buffer 
area by the operating system. 


ZONE 5 = 4K (МО / RAM) — CHARACTER ROM 


Normally this is the І/О devices' area. Only with memory configuration 
that does not have any 1/О device will RAM appear in this zone. The 
'shadow' character ROM can be banked in and out under processor 
control of signal CHAREN. 


ZONE 6 — 8K KERNAL ROM — RAM 


Usually this is the KERNAL ROM but the 'shadow' RAM can be switched 
in and out under software control of processor signal HIRAM. 
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NOTE: Even when RAM is banked out in case of Zone 3 ог Zone 6, a 
WRITE or POKE operation to a ROM address wil store the data in the 
'shadow' RAM. This characteristic allows, for example, a hi-resolution 
screen to be stored in a ‘shadow’ RAM area without banking it in and out. 


MEMORY MANAGEMENT 


Memory management on Commodore 64, in essence, is the selection of 
banks in particular zones of memory by using some control signals. It is 


best illustrated in a table:- 
[Signal | Level 


Address 


Access (Bank-in) 
BASIC/External ROM 
$A000 — $BFFF LORAM клу с 


(8К) EM RAM 
$0000 — $DFFF DT EE /О / RAM 
(4K) Ки Сћагасјег ВОМ 


$E000 —$ЕЕЕЕ | АМ KERNAL ROM 
(8K) RAM 


Memory Management Signals (NOTE: All three signals are normally 1) 


These control signals are taken from the 6510 internal МО port which 
also has 3 other signals that control a cassette. The direction of each line 
of the port is set up by a bit pattern written into the data direction register 
(address $0000). A О bit designates an input line on the I/O port (address 
$0001) while a 1 bit corresponds to an output line. 


МО Port Control Lines 
($0001) 


Data Direction Register 
($0000) 


1 (output) LORAM 

1 (output) CHAREN 

1 (output) HIRAM 

1 (output) Cassette write line 

0 (input) Cassette switch sense 
1 (output) Cassette motor control 


6510 Input/Output Port Assignment 


SOME MEMORY CONFIGURATIONS 

Here are some illustrations of possible memory configurations available 
on the Commodore 64. The characteristics and main use of each 
configuration and the levels of control signals that achieve it are listed. 
(NOTE: 1 = HIGH, 0 = LOW, X = DON'T CARE) 
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Standard — 8K ROM BASIC 2.0 and 38K contiguous user RAM 


8K KERNAL ROM 


4K RAM (buffer 


8K BASIC ROM 
8K RAM 


32K RAM 
(30K user 
1K video 

1K OS) 


LORAM = 1 
HIRAM = 1 
CHAREN = 1 
EXROM = 1 
GAME - 1 


2000 
0000 
С000 


А000 
8000 


0000 


Enhanced BASIC — 8K BASIC standard ROM and 8K enhanced BASIC 
ROM and 32K contiguous RAM 


— 8K KERNAL ROM TTE 

D000 4K 1/0 HIRAM = 1 

С000 4K RAM (buffer) CHAREN = 1 
8K BASIC ROM SMS 1 


A009 8K ROM Cartridge 
8000 Enhanced BASIC 


32K RAM 


0000 
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Language ROM — 8K Language ROM (override BASIC) and 40K 


contiguous RAM 
8K KERNAL ROM 

Е000 4K 1/0 

0000 АК RAM (buffer) LORAM = 0 
HIRAM = 1 
CHAREN = 1 
EXROM = 0 
GAME = 0 


32K RAM 


0000 


Allocation ROM — 16K application or language ROM and 32K 
contiguous RAM. 
e.g. word processors, intelligent terminals 


8K KERNAL ROM 


F000 
C000 
| LORAM = 1 
16K Rom Cartridge HIRAM = 1 
CHAREN - 1 
8000 EXROM - 0 
GAME = 0 


32K RAM 


0000 
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ULTIMAX Video Game — 16K ROM and АК RAM only 


8K ROM Cartridge 
4К МО 


Е000 


0000 

А000 НІНАМ - Х 

8000 ЕХНОМ = 1 
САМЕ =0 


28К ореп 


1000 4K RAM 


0000 


Softload Language 52K contiguous RAM for softload languages, user 
RAM, I/O devices and I/O drive routines, e.g. CP/M 


8K KERNAL ROM 


E000 | — aKVO | 
р000 
С000 
LORAM = 0 
16K RAM HIRAM = 1 
CHAREN = 1 
8000 EXROM = X 
GAME = 1 
32K RAM 
0000 
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64K RAM — 1/0 devices must be banked in for апу I/O operation 
8K RAM 


16K RAM E000 
0000 a RAN 
С000 С000 
LORAM = 0 LORAM=1 
16K RAM | HIRAM = 0 16K RAM | HIRAM=0 
CHAREN = 1 CHAREN=1 
8000 EXROM =X 8000 EXROM=X 
GAME = 1 GAME=1 
32K RAM 32K RAM 
0000 0000 
PROGRAM ENTRY 


There are 3 common methods of entering machine code programs on 
the Commodore 64. 


1. BASIC STATEMENTS 

This method is suitable for simple and short machine code routines used 
within a BASIC program. First of all, the routine has to be assembled, 
usually by hand. Each code is converted to its decimal value (an 
unfamiliar numbering system to a machine language programmer). Then 
the codes are stored in BASIC DATA statments. A simple READ and 
POKE loop will set up the machine code routine at a specific location. 
Subsequent SYS or USR statements can use this routine. 


This is the cheapest method because no additional purchase of software 
is required. However, the amount of time required to debug or modify the 
code will increase drastically with the size of the routine. Imagine typing a 
500 byte program in decimal values or several scores of DATA 
statements and then having to locate a typing or conversion mistake. 
Example: 

5 RESTORE : М = 12 * 4096 : REM $С000 

6 READ X : IF X <> -1 THEN POKE M, X:M=M+1, GOTO 6 

10 Initialization of formal basic 


1 000 DATA 32, 207,255, 157,0, 193,232,201 ,13,246,96, – 1 
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Notes:- 

a) The use of delimiter —1 avoids the problem of having to count the 
numbers of bytes as in a FOR...NEXT loop. 

b) Subsequent running of this BASIC program should start at line 10. 
This eliminates the time-consuming READ and POKE process to set up 
the machine code registers (of course, self-modifying codes are always 
forbidden!). 


2. MACHINE LANGUAGE MONITOR 

A ROM cartridge called 64MON is provided by Commodore to let you 
a) enter machine code programs in Hexadecimal codes or Mnemonic 
forms 

b) assemble and disassemble machine language 

c) debug machine code programs 

d) save and load machine code programs. 

A monitor of this kind is recommended for any serious machine language 
programmer. With 64MON, you can enter a machine code routine by 
specifying the starting address and then the instructions. 

Example: 

A C000 JSR $FFCF 

A СООЗ STA $C100, X 

A C006 INX 

A C007 CMP #$0D 

A C009 BNE %С000 

A COOA RTS 


3. EDITOR/ASSEMBLER PACKAGE 

An editor/assembler allows you, at the very least, to use label references 
in programs and save source programs instead of object codes. A more 
sophisticated package can have the following features:- 

— macro, conditional and/or interactive assembly 

— symbol table and cross reference 

— formatted assembly listing 

— object modules linking and relocation 

— run-time debug aids 

With an editor/assembler, you can write much better documented 
assembly language programs. 


Example:- 
CHRIN = $ЕЕСЕ ; input 1 character routine 
LINEBUF - $C100 ; input line buffer 
CR = 13 ; [RETURN] character 
*= %С00 ; code starting address 
GETLINE: JSR CHRIN input 1 character 
STA  LINEBUF, X ; put character т line buffer 
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CMP ЖСН ; is it [RETURN] character? 
BNE GETLINE ;МО-- get next charcter 
RTS ; exit only if whole line input 


PROGRAM EXECUTION 


A machine language program can be executed by calling it in a BASIC 
program or directly run under a machine language monitor. Some of the 
system handling routines can be substituted by user written ones with 
careful modification of the vectors. 


1. BASIC CONTROL PROGRAM 


A BASIC porgram can use machine code routines as subroutines. These 
subroutines must end with a 'RTS' instruction to return control to the 
BASIC calling program. There are 2 ways of calling machine language 
subroutines in BASIC. 


a) SYS [addr] statement 

This BASIC statement enters a machine language subroutine at address 
[addr]. Execution continues with the next BASIC statement on return. 
Parameters can be passed by putting them in commonly known memory 
locations. This method allows simple and efficient interface between 
BASIC and machine language programs. Multiple parameters and 
several machine code subroutines are handled with ease. 


b) USR ( [x] ) Function 

This BASIC function calls a machine language subroutine whose entry 
point is stored at address 785, 786 (conventional low, high byte order). 
The parameter [x] is passed by putting its value in the Floating Point 
Accumulator #1. On return, BASIC will take the value in the floating point 
accumulator as the value of the function. This method is more suitable for 
routines that pass a single parameter only, especially with floating point 
numbers. Be careful to set up the correct entry point at 785 and 786 
before calling this function when you have more than one machine code 
subroutine. 


Sign 
Об 


$0062 
500611  Exponent — 
Floating Point Accumulator #1 
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2. MACHINE LANGUAGE MONITOR 


With 64MON, you can execute a machine code routine by specifying its 
starting address. The routine should end with a ‘BRK’ instruction to return 
control the the monitor. 

Example: 

G C000 

By setting up breakpoints, memory and registers can be examined at 
critical points. The routine can then be resumed with or without any 
alteration. This makes debugging of the machine language program 
easier. 


3. SUBSTITUTION OF SYSTEM HANDLING ROUTINES 


For those system routines which are called via their indirect vectors in 
RAM, they can be easily substituted by modifying their corresponding 
vectors to point to the user written routines. 

Such user routines must end in the same way as their system 
equivalents — either with a ‘RTS’ or a ‘RTI’ instruction. Normally, you 
want to do something extra before transferring the control back to the 
standard routine. Therefore a 'JMP' instruction will be more frequently 
used here. 

Here are some system handling routines that can be substituted. 

a) BASIC Interpreter Routines 

— e.g. tokenize keywords, LIST, print error messages and evaluate 
tokens, etc. 

The vector table resides at $0300 — $030B 

b) KERNAL Input/Output Routines 

— e.g. OPEN/CLOSE, LOAD/SAVE, CHRIN/CHROUT, etc 

The vector table resides at $031A — $0333 

c) Processor Interrupt Handlers 

— e.g. hardware interrupt request (IRQ), non-maskable interrupt (NMI), 
software interrupt instruction (BRK) 

The vector table resides at $0314 — $0319. 

(NOTE: IRQ interrupts every 1/50 of a second (1/60 in U.S.A) and the 
KERNAL makes use of this to update the time (ТІ, ТФ) and scan the 
keyboard. Make sure you return to the system handler unless you intend 
otherwise. Disable IRQ before you modify its vector) 

d) Wedge' New Commands 

— By detouring from the CHRGET (get next BASIC byte) routine at $73 
— $8A, new commands can be added. If all new commands begin with a 
common character (( is a popular choice), 'wedging' interpretation will 
be faster. Commands that do not start with ‘@’ are passed back to the 
standard handling routine; those that do start with “@' are searched and 
executed by the user routine. 

e)Keyboard Entry Routines 

— e.g. keyboard table setup and decode, INPUT routine 

Keys can be redefined according to user requirement. 
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SOME COMMODORE 64 USEFUL ROUTINES 


A. PAUSING ‘LIST’ OUTPUT 


A very short machine language routine can add to the Commodore 64 a 
highly desirable feature on the LIST program command. The continuous 
scrolling of text lines on the screen is usually too fast for the human eyes. 
It would be nice to pause the output by holding down the shift key and be 
able to freeze it by pressing the shift-lock key. The following routine does 
just that. 


$57143 -de $028 260 $91251 14$ -кау prassad) 
51156 „Зе Sa7la ;.systàm LIST tokens routine 
„Ба 8с000 :рашље routine starts at #cOVO 
70600 AS 28 wait 13а shflag ?shift Key pressed? 
сзаг па FC bne wait 79$, wait for relaase 
7904 68 pla smo restore token 
СОЗ 4C ца A7 imp slist 26157 token 


This is an example of substituting BASIC interpreter routines — the LIST 
tokens handler. By modifying the vector at $0306, this coding of pause 
check can be inserted before the actual printing of tokens. If we have the 
above codes at $C000, we can enable the pause feature by POKE 774, 0 
:POKE 775, 192 (i.e. $C000 — $0306). 


B. PROGRAMMING FUNCTION KEYS 

Each of the Commodore 64's eight function keys can be used to 
represent a series of keystrokes as entered from the keyboard. 

The operating system uses a keyboard buffer queue to store any key 
entered from the keyboard. The system IRQ interrupt handler puts 
entered keys at the end of the queue while the BASIC interpreter takes 
them off the queue in a first-in-first-out (FIFO) order. If a user interrupt 
routine puts on the queue a string of pre-defined chracters when a 
function key is pressed, the system will be deceived to think that the 
string was actually typed on the keyboard. 

This method of programming function keys can illustrate the technique of 
substituting a system interrupt handling routine. The following simple 
example will put "LIST [RETURN]"on the keyboard buffer queue when 
[f1] key is hit. 
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гђа 22008 


сг „Че 13 2ВЕТУНМ character 
пах „де %с6 по. of characters in 
Kayboard buffer queue 
kayd -de 5927? keyboard buffer queue 
(10 bytes long?) 
ciny .de $0314 PIRO interrupt vactor in RAM 
sira4 ‚де $9331 system {ВО handling routine 
зспкеу ade Sf49F ізсап У вубзагд and put Key 


entered onto queue 


set up to override system IRQ handlar with usar routine 
73 init 521 71RQ must be disabled during 
a9 Od Ida Hi,uirq modification of its vector 
за {4 өз sta cinv 
a9 сад 1da Hüh,uirq 
за 15 өз sta cinvel 
58 cli 
59 rts 
user IRQ handler(executed every 1/50th of а sacond) 
29 9+ ff Uirg jsr scnkey ?scan Keyboard 
аб c8 Idx tndx 
+0 16 Баад exit гах1% if no Key 
ca dex іроіп% at last Key in queue 
bd 77 ва lda Keyd,x 
с9 95 стр #%85 sCF 122 
dO де bne axit tno, do nothing 
ад ff 14у #255 уе», put predefined string 
2 put iny гопћо Keyboard buffer queue 
е8 inx 
b9 га сө 14а string,y 
9d 77 ва sta Кеуі,х 
dO #6 bne put string terminated by byte В 
86 св $tx andx Jupdata no. of bytas in quaue 
дс 3! ea exit ime 51га resume with system [RQ handler 
fuser dafinable string of Keys 
Зе 49 53 string „Бу ‘LIST' cr О 
54 
8d AD 


With the machine codes residing from $С000 upwards, the initialization 
routine can be activated by SYS 12'4096. 


C. RECOVERING "NEWed" PROGRAM 


This program we will use will also serve to show how additional 
commands can be 'wedged' into the BASIC operating system. Below is a 
listing of an operating system routine CHRGET' that we will wedge our 
routine into. 
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0073 Е67А CHRGET INC TXTPTR ; get next byte 


0075 DO 02 BNE CHRGOT 

0077 E6 7B INC TXTPTR- 1 

0079 AD ???? CHRGOT LDA 27722 ; get current byte 
007C C9 3A CMP #$3A 

007E NOOA BCS CHRET ; ignore ASCII 9 
0080 C9 20 CMP #$20 

0082 FO EF BEQ CHRGET ; skip space characters 
0084 38 SEC 

0085 E9 30 SBC #$30 

0087 38 SEC 

0088 E9 DO SBC #$D0 

008A 60 CHRET RTS 

NOTE: 


Locations $7A and $7B are used as TXTPTR which points at the current 
byte in the BASIC text buffer to be interpreted. This routine is keptin RAM 
so that it can modify 2277, the address of the current byte, continually. 


We will make use of the fact that CHRGET resides in RAM by wedging 
our routine into CHRGET. To use this routine, it must have already been 
loaded before the NEW command was executed. To recover a NEWed 
program, simply type @OLD. 


10 os 

ae „Ьа $cO000 

30 CHRGET de $73 Jget next BASIC byte routine 
40 CHRGNT .de 578 299% current BASIC byte routine 
50 ТХТРТК „Че %7а current BASIC byte pointer 

БӨ IERROR .de $0300 Juvector of print error message routine 
70 „Ба $cO800 

80 ; DETOUR FROM CHRGET 

9e LOX #2 

108 DETRI LDA JCODE,X 4геріаса ist instruction of CHRGET 
110 STA CHRGET,X Juith ‘jump wedge’ 

120 DEX 

130 BPL DETR! 

140 RTS 

150 JCODE JMP WEDGE Jjume instruction codes 

160 XSAVE .0S 1 

170 ; CHECK FOR WEDGE COMMANDS 

180 WEDGE 

198 INC TXTPTR JPOINT AT NEXT BYTE 

2800 BNE WEDG! 

218 INC TXTPTR*1 

220 ШЕПбІ STX XSAVE 

230 TSX 

240 SEC 
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250 
260 
278 
288 
aso 
зов 
318 
328 
338 
340 
358 
360 
378 
388 
338 
ада 
410 
ага 
аз@ 
ача 
4590 
460 
4?0 
480 
490 
508 
519 
520 
$30 
540 
558 
568 
570 
580 
538 
бод 
610 
eae 
630 
640 
650 
660 
678 
esa 
633 
700 
710 
720 
730 
740 
750 
768 
778 
788 
238 
здо 
810 
820 


LOA #8101,%x 


SBC #s8C 
ADC $0102,X 2шаз CHRGET called from 
SBC наа 3the direct mode? 
BNE LEDGY ignora wedge commands 
from other modes 
JSR CHRGOT 
CMP #'2 suedge command identifier? 
BEQ WOGCMD Jyes,dispatch command 
WEDGS LOX SAVE эпо restore X 
JMP CHRGOT return 
$ dispatch wedge commands 


26 for the simplicity of this example 

} proper handling should involve storing 
2 all valid commands іп a table and 

$ searching the input command through 

2 the table). 


WDOGCID JSR CHRGET Jget next byte 
СМР W'O 01837 
BEQ RECOVR Jy&ás,racovary routine 
СМР #'R 
BEQ RECOVR 
LDX #%08 3if invalid command 
JMP € IERROR) sprint syntax error 

$ RECOVER "ELED" PROGRAM 


TXTTAB de $2b pointer start of basic 
VARTAB ада $24 Jpointer !start of basic variables 
ARYTAB „Че 52+ Spointer tstart of basic arrays 
STREND ‚бе $31 pointer tend of basic arrays 
PTR .de $2d 
TEMP de $8f 
RECOVR 

LOY #3 Jdisgard next-line pointer & line no. 
RCVR1I INY 

LDA < ТХТТАВ),Ү #search for line delimitar 

BNE АСУК1 I< 600) of first line 

TYA 

SEC 2%1 to point to 2nd line 

ADC TXTTAB 

LDY #0 

STA стхиттав),“ ;rectify next-line pointer 

Jfor first line 

STA $20 Jinit temp work pointer 

INY 

LDA saec 

STA < ТХТТАВ>2,Ү 

STA $2Е 
trace next line until end of program text 

LOY #0 
RCVR2 LOA ¢$20),Y 

STA өгғ 

INY Јроѕіїіоп to address high 

LDA < $2D),Y 

TAX 

ORA $2F slink addresss$00007 

BEQ RCVR3 Jyes,and of program 

STX $2Е Jno,trace next link 

LOA $2F 
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£'ao'sgi's2iuitd 
291704” ЕСЕТ ӘР”ЕСІ Sb ЕЕГ ӨНІМІ 
SOI’ Sp’ ssl’ ББ ЕБ аЬ ЕЕ" БЫГЫП 
БЕТ“ 2501 spr’ Sol’ te’ See’ десној 
SET Gb’ EEI Zb GSI Sb’ vel 758/806 
драга“ G GALI ‘St’ LLT де "ЕН 
EET Sp cdl ’S’usl ЭБ ЕБЕТ ЕРЫ БС 
Spl’ pp’ SSl’GGe’ Sp’ cel’ er’ Stir lyu 
52... 
Ep llt GBZ E OIIE 8 е gerl 
11729176” 222 lo2/^5*'agbp2zuruü 
5242... 
абтгрторат“зодра“ Ы971062 BELO 
уо оа РӘТ “сес” “арама 
сст”ӘРІ”ЕБКӘ ІІ 1 eer’ ss" 895 
SUP Ges’ 2a’ sGe' est МЕ 
Bea’ Goa’ 2561: 51782 96 Bre’ oi Leu 
ZOZ STIT” врте“ #1725 se’ 48516160 
zz2isb SAS 
іқтм:М”Іжа6ТӘР 3404: Ы 05934:521 0+ Әсі ЧОД 
змимоОмја JSMaN 2534601538 HOIMHM HAH 
070% INEWWOSD сайы LYHL 39ü3 Waa 


ма” 
31598 9» uJn4»4 9; CHOWHN3I) су 
AQUSM 34149: esse хал 
ZES 915 
GES 915 
388 918 
оғ 52049 
32% М9П1 
$20249 уо pue 20$: 15% 915 
SALIJ 30 32915 40; 32% 915 
зэтаераей ро ZALLE OFf 92$ 916 
ute u48nJd зо pus 209339 39612 цотуүзодг әв 308 
ас% чал 
2719 ЕЗЛЭЗ 
зчезитоа 21698 11% 32824402: 
u»uvaq кетпе; ечлэч 038 
пој se9Jppe o4 иот 31009494: Аза 
02% 916 


об: 
Ss 
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6991 
966 
986 
826 
996 
056 
145 
0Е6 
926 
916 
695 
058 
авв 
228 
998 
ess 
258 
958 


COMMODORE 64 KERNAL 


CONCEPTS OF KERNAL AND OPERATING SYSTEM 


A microprocessor, no matter how large its instruction set is and no matter 
how fast it can run, will get nowhere without a well-knit piece of software 
that supervises it. This supervisory program is known as an 
OPERATING SYSTEM. The operating system accepts what you type on 
the keyboard; echoes it on the monitor; prints an error message if it does 
not understand what you typed; executes your command if it makes 
sense; loads a program from disk drive if necessary; prints something on 
the printer if required; ... In other words, the operating system co- 
ordinates and manages all resources of the computer to be at your 
service. 


The operating system has a large collection of routines that perform 
system initializations, memory management and all kinds of input/ 
output. These routines are usually highly hardware dependent which 
means different routines have to be written for different devices. From a 
user point of view, you want to be able to use these routines without 
worrying about what hardware you are dealing with. Most microcomputer 
manufacturers prepare a list of callable system routines with their 
addresses and methods of calling. The problem arises when a later 
version of the operating system is released; all these entry points will be 
different. Old software which made use of these routines is no longer 
compatible. 


Commodore 64 has solved this problem by storing all the entry points of 
the supported system routines in a Jump Table called KERNAL. This 
jump table is located on the last page of memory, in the KERNAL ROM. 
The entries of this table are well documented and will remain unchanged 
in future ROM releases. Any individual system routine can be modified 
and relocated inside the ROM. However,such a change will be 
‘transparent’ to the user program as long as the jump pointer in the 


KERNAL has been updated. 
JSR $FFC6 


Example - 
JMP $E678 | 
Application 


$FFC6 | JMP $FABC | 
Ргодгат 


КЕНЕН 
та а 
ROM 1.0 НОМ2.0 


RTS 
The application program will run just as well on both ROM versions. 


ФҒАВС 
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POWER-UP INITIALIZATIONS 


On power-up, the KERNAL performs a series of self-tests and system 
initializations. The sequence of activities is outlined below:- 


1. For the 6510 processor, the Stack Pointer is reset to $FF and the 
Decimal Mode Flag is cleared. 


2. Location $8004 — $8008 are examined. If an 'auto-start' ROM header 
is found, control is passed to the 'auto-start' ROM using the vector at 
$8000. Otherwise, normal power-up sequence continues. 


3. МО ports and devices are initialized 

— CIA#1 to scan keyboard, joystick, paddle and light pen 

— CIA#1 to activate real-time clock 

— CIA#2 to initialize Serial Bus 

— CIA#2 to reset User/RS-232 port 

— SID to clear all voices 

— 6510 МО port to select memory configuration for BASIC mode 
— 6510 МО port to turn off cassette motor. 


4. RAM test is carried out from $0300 upwards. The top memory pointer 
is determined by the first non-RAM location encountered. The bottom 
memory pointer is always set to $0800. The screen memory always 
starts at $0400. 


5. All I/O vectors, pointers, flags and variables in RAM are initialized. 


6. The screen is cleared and all the screen editor variables reset. Control 
is passed to BASIC using the vector at %А000. 

Next time if you notice a slight delay when turning the power on, you will 
know that it is working very hard to get all these things straightened out. 


USING KERNAL ROUTINES 


For you to use the KERNAL routines, you must:- 

— find out the right one to use and its entry point address 

— call preparatory routine, if necessary 

— pass parameters in communication registers, 

— call the routine 

— handle any return error (indicated by Carry Flag set) 

— save and restore registers affected by the routine, if necessary 
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SOME USEFUL KERNAL ROUTINES 


Regis- 
Preparatory Communications ters 
Address Routines Rogisters Affected 


User Interface 


Input 1 Character 
(from keyboard) 
Output 1 Character 
(to Screen) 

Get 1 Character from 


.A=input character 


.A- output character 


.A-character removed] .Х,.Ү 
=0 if none 

C flags 1 read 
=0 set 
.X=row(0-24) 

У «column(0-39) 


Keyboard Queue 
Read/Set Cursor Position 


storage МО 
Set Up Logical File No. 


=$FF if no command 
.A=length of filename 
.X=filaname address 
(low) 

. Y «filename address 


Set Up File Name 


Load/Verify Memory 
from Device 


Save Memory to Device 


of start SAVE pointer 
.X=end SAVE pointer 
address (low) 

.Y 2end SAVE pointer 
address (high) 


1. CHRIN — INPUT 1 CHARACTER (FROM KEYBOARD) 


When this routine is initially called, the cursor will blink and input a line of 
characters terminated with a carriage return. The routine will return with 
the first character in .A. Subsequent calls will retrieve the characters 
already input one by one. Detection of a carriage return means the whole 
input line has been retrieved. A subsequent call will initiate the cursor 
blinking and line input again. 


2. CHROUT — OUTPUT 1 CHARACTER (TO SCREEN) 


A character whose ASCII value is in the .A is printed on the screen and 
the cursor advances. 


3. GETIN — GET 1 CHARACTER FROM KEYBOARD QUEUE 

Any key pressed on the keyboard is detected by the system IRQ interrupt 
handler. its ASCII code will be stored іп a keyboard buffer queue which 
can hold up to 10 characters. When called, this routine will remove the 
first character from the queue. If there is no character in the queue, a byte 
zero will be returned in the .A. 
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4. PLOT — READ/SET CURSOR POSITION 


This routine can read/set the current cursor position when called with the 
Carry Flag set/clear accordingly .X stores the row number (0 — 24) and 
Y stores the column number (0 — 39). 


5. SETLFS — SET LOGICAL FILE NUMBER, FIRST AND SECOND 
ADDRESS OF DEVICE 

This routine assigns a logical file number to a physical device (device 
number 0 — 31). The secondary address or command of the device is 
also declared here. There are a number of reserved device numbers for 
the Commodore 64:- 

Device number 


RS-232 Device 
Screen 

Serial Bus Printer 
Serial Bus Disk Drive 


пљљоћ-— O 


„А is used to pass the logical Ше number .X the device number ала У the 
command. If no command is required, put $FF in У. 


6. SETNAM — SET UP FILE NAME 

This routine sets up a file name for the LOAD or SAVE routine .A is used 
to pass the length of the file name and,X and Y contain the address of the 
file name (X = low order, Y = high order address). If no file name is 
necessary, .A stores a zero showing a file name of null length. 


7. LOAD — LOAD/VERIFY MEMORY FROM DEVICE 


When called with a zero in .A, this routine loads a file from device into 
memory. When called with a one in .A, this routine verifies a file from 
device against the corresponding contents in the memory. 


8. SAVE — SAVE MEMORY TO DEVICE 

This routine saves a contiguous portion of memory onto a device file. The 
start address of the memory to be saved is stored in a page-zero pointer. 
Тһе А is used to pass the page-zero address of this start pointer. The.X 
and Y are used to pass the end address (in low, high order) 


SIMPLE PROGRAMS THAT CALL KERNAL ROUTINES 


A. PLOTUSING GRAPHICS CHARACTERS 


This program plots anywhere on the screen using different graphics 
characters. Three KERNAL routines are called — CHROUT, GETIN and 
PLOT. 
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Call ‘plot’ from BASIC by typing SYS 49152. 
Plot instructions: 


[f1] = up 
[f3] = right 
[f5] = left 
[f7] = down 


to gf = graphics characters 
<ѕрасе? = blank 


= End plot 


10 . 05 

20 „Ьа #cAMQn 
За chrout „је $ffde 
да де?іп ‚бе *ffa4 
90 plct Ga #++42 
СЯ shape ‚де #26 

ТО xsavea de $27 

PA узауеа „Ла #28 

AA binsw ‚Зе $cc 
1009 гр++19 .de £a28a 
11а; 

ima 2 

ІЗА sinitialize screen 
зар : 

150 plo*g 1 #$93 
159 jar chraut 
178 lda #@ 

180 sta xblnsH 
тас !da #589 
PAR sta rptfig 
eie ldx #12 
рой 14у #19 
esae lda #77 
249 upshp sta *shape 
250 ; 
eem : 

TÓ sprint shape char 


ea0 outshp 
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jshape char to plot 


ісісау screen 
;5linK cursor 
enable repeat 
;init cursor 


sat screen centre 


гирпаће shape 


Ne че ча 


ft 


асып 


stx 
sty 
cic 
gsr 
lda 
jsr 


14а 


jer 


wait for key 


3 $ г. 
Idx 
14у 
c mp 


beq 
if <astop>? 


Сүр 


Жх-аме 
*ysaue 


Plot 
*shape 
chrout 
#+94 
chrout 


input 


зетін 
*ixseye 
keys ave 
Diu 
imkey 


ЕЗ 


beg exit 


£E SPACE? 


стр 
Баа 


#=г2@ 
upshp 


if <f1> 


cmp 


heq 
right 


c mp 
beq 


cmp 


#335 
up 


if 513» 


#SRS 
right 


if <+5> 


#57 


bea left 


c mp 
baq 


cnp 
bcc 
c mp 
bcs 


if 


<F7> 
#288 
down 


not graphics char 
{ $aQ—-BdF 3 
ignore 


#%ай 
inkey 
#$ей 
inKey 
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;set cursor pos. 


?print shape 
Баскзрасе 


jrestore х,у 


РЕД :iupdate shape char 
Y 


"за jmp upshp 

тай : 

(Se 3 

730 cursor movement 

778 3 

780 up dex ;dec rou 
Tu срх H$ff 

Е@@ bne upl 

310 ldx #24 

820 uf1 jmp outshp 

зза : 

848 doun inx Finc row 
858 срх НЕЗ 

86a bre douni 

870 ldx ва 

ава асып! jmp outshp 

39A + 

зай right iny ;inc cal 
9190 cpy #46 

ага bne righti 

239 ldy #0 

аза rightl jmp outshp 

350 ; 

9680 left dey гдес col 
372 сру #3ff 

эва bne 12+%1 

зэв ld» #39 
1608 lefti jmp outshp 
1610 > 
1620 ғзехії to basic 
1538 ; 
176420 exit 14а ##93 
155 jsr chrout 
1268 sclear screen 
1678 rts 
1еза ‚ем 

PLOT 


128 FOR 1-0 TO 131:READ А:РОКЕ48152%1,8:МЕХТ 
110 SYS43915e 
128 пата1в8,147,32,210,255,1689,0,133 
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3e ратагод,162,128,141,138,2,122,12 
140 DATAIEG,19,169,119,133,28,134,39 
150 рата132,40,24,32 ,248 ,255,165,38 
јел DATASE,210,255,169,157,32,210,255 
170 DATA32,888,855,166,39,164,40,201 
JEC патво,240,245,201,3,240,71,201 
190 ретазг,248,217,2801,133,240,23,20! 
eam пате134,248,389,201,135,248 ,45,201 
218 рпта136,248,21,201,160,144,217 ,281 
22@ ратаг2а,172,213,76,28,1382 ,202 ,224 
тзт прпеатаг55,202,2,182,24,76,22,132 
гаа патагзг,224,25,208,2,)6Е2,0,76 

emm OBTANE,192,200,192,49,208,2, 166 
РЕЙ MATAG,76,22? .192, 1236, 192,255 ,208 
ота DAT32.150,39,76.92,192,169,147 
esee DATF22,210,255 As 


Graphics Using Machine Code 


The following programs enable the BASIC programmer simple access to 
extended graphics facilities such as high resolution plotting. When used 
Creatively these programs can produce quite impressive displays on 
your Commodore 64. 


Graphics.asm is an assembly listing of a program that provides the 
BASIC programmer with access to graphics commands. These 
commands, whilst being very useful, also serve as a demonstration of 
assembly language programming. They enable the programmer to set 
up a bit mapped screen with one SYS statement, and also to plot points 
by specifying X and Y co-ordinates. Resourceful programmers will be 
able to incorporate these routines into their own line drawing and circle 
drawing programs. 


Graphics.bas is BASIC program which reads the assembly code into 
memory. It also demonstrates the correct use of the assembly routines. 
Graphics.asm consists of two main routines, HIRES and PLOTXY, as 
well as several subroutines. HIRES is an excellent example of changing 
video banks, screens and character sets as well as clearing blocks of 
memory. PLOTXY is the routine that handles the plotting of points. It calls 
the routine PARAMS to obtain the X and Y co-ordinates. PARAMS in turn 
calls many subroutines that reside in the BASIC operating system. The 
correct use of these routines is shown in the assembly listing. 


PLOT, the routine that actually plots the points in memory uses the 
following formula to determine the address of the byte to be changed. 
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ROW = INT (Y / 8) 
COL = INT (X / 8) 
LINE = Y AND7 
BIT = 7 – (ХАМО 7) 


ADDRESS = ВАЗЕ + ROW * 320 + COL * 8 + LINE 
where base is the address of the start of the bit map. 


The correct bit within the byte is set as follows:- 
POKE ADDRESS, PEEK (ADDRESS) OR2 + BIT 


NOTE: the assembly program uses an array containing the values of 


2 4 BIT. 
GRAPHICS ASM 


„0% 
.ba өсдәр 
«Басе .de $fb 


params dsr $ае+а 
ise %жай48а 
jer %57+7 
1да $14 
$&ta neucol 
lda 515 
sta neucol +1 
Jsr Saefd 
jsr $b79a 
stx neurou 
јог Saef7 
rts 


Plot lda roucrs 
lsr a 
1$г a 
Isr а 
sta trou 
1да coicrs 
sta tcol 
ida colcrs*i 
15г а 
ror tcol 
isr a 
ror tcol 
lsr a 
ror tcol 
sta tcol*i 
lda гомсг5 
and #7 
sta line 
1да colcrs 
and #7 
sta bit 
14а #7 
sec 


J$tore object code іп татогу 
Jbegin assembly at $cO0O00 (49152) 
Jjvariable! pointer to bit map base 


Jcheck for bracket 
Jaevaluate formula 
ісопчегі to 18 bit number 


8х pos. low 
7x pos. high 
ichecK for comma 
gat 8 bit number 


2y pos. 
2сһеск for right bracket 


jget rou 
24іміде by В 
3temp row 
Jtemp column 


26іміде column by В 


3 offset іп rou 
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РЗ 


p2 


Рі 


РВ 


РЗ 


P4 


sbc 
sta 
1да 
sta 
lda 
sta 
ldx 
beq 
inc 
lda 
clc 
adc 
ata 
bee 
inc 
dex 
bne 
1да 
asl 
as] 
asi 
bcc 
inc 
clc 
adc 
sta 
bcc 
inc 
lda 
сіс 
adc 
sta 
bec 
inc 
1дх 
ldy 
14а 
ога 
ata 
rts 


ise 
Jjsr 
jsr 
jsr 
jsr 
14а 
ога 
$ta 
ida 
sta 
sta 
sta 
sta 
sta 
rts 


bit 

bit 

ко 
stbase 
и%60 
xtbase*i 
trou 

P1 
stbasatl 
stbase 


864 
*tbase 
Pe 
xtbase*t*i 


P3 

tcol 

а 

а 

а 

РВ 
stbase*! 


stbase 
stbase 
РӘ 
з+һЬазе+1 
*tbase 


l ine 
stbase 

р4 
*tbase*i 
bit 

“а 

( tbase),y 
ortab,x 

< thase).y 


setbank 
setchbase 
setscreen 
cirbit 
cirscreen 
34011 

438 

34011 

"о 

oldrow 
oldcol 
oldrou 
oldcol 
oldcol +1 


sof 
start of screen (low byte? 


start of screen Chigh byte) 


J add 256 to screen address 


add 64 to screen address (ie 320) 


smultiply column by 8 


3 add rou offsat 


?tbase and tbhasat! contain byte address 
Joffset into byte 


set proper bit to 1 


3ве% video bank 

set bit map base 

sset screen (bit map color data) 
clear bit map memory 

$at bit map color data 


Jturn on bit map 


set oldrou and oldcol 


set oldrou and oldcol 
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setbank 


we ~ 


setchbase 


2 
H 


setscreen 


H 
3 
cirscreen 


clr 


3 
3 
cirbit 


cib 


U ~ ~ 


1о%ху 


xyi 


1да 
ога 
sta 
1да 
апа 
ога 
sta 
rts 


lda 
and 
ora 


sta 
rts 


lda 
and 
ora 


sta 
rts 


lda 
ldx 
sta 
sta 
sta 
sta 
dex 
bne 
rts 


1да 
sta 
lida 
sta 
ldy 
sta 
dey 
bne 
ine 
14х 
CPx 
bne 
rts 


isr 
1да 
стр 
bcc 
rts 
ida 
cmp 


$3302 
43 

5ааег 
заада 
#252 
#2 

$d doo 


$3018 
#240 
as 


$3018 


Sd018 
815 
#112 


94018 


"16 
"а 
%5с00,х 
$53090 ,х 
55200 ,х 
5ғ2ө ‚Хх 


clr 


8860 
*stbase*i 
не 

stbase 

на 

( Базе), у 


cib 
stbasa+i 
stbasa+! 
#380 
cib 


params 
пеыгом 
игвд 
xyi 


neucol 
#64 


$ set to outputs 


358% bank 1 


3ве% char base to #2080 
Cie bit map et $5080) 


Jset screen to %1с08 
(ie screen address is ө5с00 


sclear screen dataCie bit map color data) 
Jforaground color =white,backgroundsbiack 


Jclears memory from $6000 to $7fff) 


j get x and y 


Jlegal rou? 


3legal column 
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bcc ху2 
lda пеыс01%1 
baq хуг 


хуа ida пеыгоы JuPpdate variables 
sta roucrs 
ata oldrou 
1да neucol 
$ta colcrs 
sta oldcol 
ida neucol*i 
sta oldcol*i 
sta colcrs*i| 


jsr plot plot point 

rts 
ortab ‚бу і а 4 B 16 32 64 128 
пеысо1 ds 2 jcontains пам column 
пеыгом eds 1 contains neu rou 
oldrow д» 1 contains old rou 
oldcol ds 2 contains old column 
rowcrs eds 1 stempory rou 
colcrs ds 2 Jtempory column 
trou eds 1 stempory rou 
tcol eds 2 дћепрогу columa 
line 4681 Joffíset into character 
bit ads 1 joffsat into byte 

„ва 
GRAPHICS BAS 
90 REM READ MACHINE CODE INTO ADDRESS 49152 

ONWARDS 


180 FOR 120 Та 345:READ A:POKE 48152*1,0:NEXT 
110 Ботобай 

120 DATA32,250,174,38,138,173,38,847 
120 DATAIS3,165,20,141,90,193,165,21 
140 DATAI91,31,193,32,253,174,32,158 
150 рата183,142,32,133,32 ,247 ,174,396 
160 Сетаітз,96,193,74,74,74, 141,99 

170 ПАТА 193, 173,97, 193,141, 100,193, 173 
180 ПАТАЭ8 , 193,74, 110,100, 193,74, 119 
199 ОАТА100, 193,74, 110,100, 193,141 ,1091 
200 ОАТА193, 173,96, 193,41,7,141,102 
DATA 193, 173,97 ,193,41,7,141, 103 
ПАТА 193, 169,7 ,56,237, 103, 193,141 
ОАТА 193,193, 169,9, 133,251, 169,96 
ОАТА 133 ‚252,174 ,39, 193,249, 16 230 
пата252, 165 ,251,24, 105,64, 133,251 
бата 144,2 230,252 ‚202,208 ,240, 173 
ОАТА 100,193, 10,10,10, 144,3 ,236 
Сатаӣ252 ,24, 101,25: ,133,251,144 ,2 


Ui e с) fo ~ 
ә © © 


N о 
® © © © 


To fo ГО Ty ГО FO го го 


(0 
© 
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ese 
380 
318 
328 
338 
240 
350 
566 
378 
зва 
330 
400 
410 
420 
438 
440 
450 
469 
470 
490 
430 
200 
510 
«aco 
528 
95 

550 
598 
eaa 
610 
629 
esa 
649 
езе 


ратагзла,252,165,251,24,1803,102,133 
рата13зл,251,144,2,238,252 ,174,103 
рата133,1260,0,177,251,23,82,133 
рата145,251,96,32,:88,132,32 ,2 17 
рата:з2,32,228,182,32,3,133,32 
ратагза,132,173,17,208,9,32 ,141 
рата17,208,159,8,141,33,133,14 1 
ратаза,183,141,35,193,36,173,2 
џатвгга1,8,3,1841,2,221,173,0 
бџатагг1,41,252,3,2,141,8,221 
ратазбв,173,24,2808,41,240,3,3 
DATA141,24,208,96,173,24,208,41 
DATAIS,9,112,141,24,208,96,169 
DATAI6,162,0,157,0,32,157,0 
БВЕТРАЗЗ,157,0,94,157,0,95,202 
DATA2OS ,241,96,169,96,133,252,169 
DATAG,133,251,169,0,1945,251,136 
ратагов,251,238,252,166,252 ,224,128 
DATA2OS ,243,96,32,0,192,173,92 
Оата18з3,201,200,144,1,86,173,808 
DATA193,201,64,144,6,173,91,193 
ратагаав,1,36,173,82 ,133,141,396 
рата133,141,33,183,1273,38 ,133, 141 
ратав“,183,141,834,183,173,31,183 
D&T5141,95,193,141,938,193,32,38 
оата132,32,1,2,4,8,15,32 

BATAE4 ‚128 

REM PLOT SINE CURVE 
HIRES=49215:PLOT=49435 

SYSC HIRES? 

FOR 1=0 TO 319 

SYS PLOT? 1,100+S INC 17/50) x808) 
NEXT 

GOTO 650 


RASTER INTERRUPTS 

The raster interrupt is one of the most powerful and versatile features of 
the Commodore 64. However, taking advantage of this feature requires 
some knowledge of machine language. 
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Raster interrupts take advantage of the sequential nature of the 
television display. The electron beam which draws the television image 
starts at the top left corner of the screen and traces horizontally accross 
the screen. When it reaches the right edge of the screen, it is turned off 
and brought back to the left side of the screen, at the same time being 
moved down a line. It repeats this process 312 times on a pal television 
(262 times on a NTSC set). At the bottom of the screen, the beam is 
turned off and returned to the upper left corner of the screen. Then the 
whole cycle is repeated again. 


At any given time you can determine the line at which the beam is on by 
reading the raster register at location 53266 ($D012). This returns the 
lower 8 bits (0 — 255). The most significant bit is bit 7 of location 53265 
($D011). If this bit is set, add 255 to the previous value. The visible 
display area is located from line 51 to line 251. 


When the raster register is written to (including the most significant bit), , 
the number that is written is saved for use with a raster compare function. 
When the actual raster value becomes the same as this number, bit О of 
the interrupt status register at location 53273 ($0019) is set to 1. If bit O of 
the interrupt enable register at location53274 ($D01A) has been set to 1 
previously, an IRQ interrupt will occur. 


When the Commodore 64 responds to an IRQ interrupt it saves all 
registers before jumping through the hardware IRQ interrupt vector at 
location 788 ($311) and 789 ($312). This is where the programmer can 
gain control of the interrupt process. 


A new interrupt routine must be written and its address must be stored in 
locations 788 (low byte) and 789 (high byte). This routine should first 
check to see if the interrupt is indeed a raster interrupt and not the 
keyboard or timer A interrupt. If it is not a raster interrupt, control should 
be returned to the normal interrupt routine at location $EA31. However, if 
it is a raster interrupt then to turn subsequent raster interrupts on, a 1 
must be written to bit O of the interrupt status register. Exit your interrupt 
routine by jumping to location $FEBC. 


Helicopter demonstrates the entire process involved in setting up a 
raster interrupt. It is a simple program that puts 16 sprites on the screen 
by changing the vertical position of the sprites with a raster interrupt. 
The applications to which raster interrupts can be put are quite diverse. 
As seen above, sprite registers can be changed, enabling the 
programmer to have up to 8 entirely different sprites on every vertical line 
if need be. Colour registers can be changed as can character sets. It is 
also possible to mix graphics modes. This is demonstrated in the 
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program SPLIT SCREEN. The top half of the screen is in normal text 
mode, while bottom half is bit mapped. 


You may notice that the border between the 2 modes jumps around at 
times. This is because the raster interrupt is an IRQ interrupt and is 
therefore queued up after previous interrupts. This problem can be 
remedied by adding the following line which turns off keyboard interrupts. 
1045 POKE 56334, PEEK (56334) AND 254 


The afore-mentioned technique for handling raster interrupts may also 
be used to handle sprite-data collisions, sprite-sprite collisions and light 
pen negative transitions. Simply use the following table when writing to 
the interrupt enable register and reading the interrupt status register. 
bit# description 

0 raster interrupt 

1 sprite-data collision 

2 sprite-sprite collision 

3 lightpen negative transition 


Note: Before attempting any cassette І/О the normal hardward IRQ 
vector MUST be restored. 


HELICOPTER 


“9 PRINT" J" 

за REM INTERRUPT CODE рате 

10A FOR І-й TO 61:READ A POKE 43152+1,8:МЕХТ I 

105 REM SPRITE рата 

110 FOR 1=7 TO 22:READ Я:РОКЕ 832+1,Я:МЕХТ I 

120 БОР 1233 TO S8:POKE S32*1,0:NEZT I 

125 РЕМ ALL SPRITES FOINT TO LOCATION 13 

іза FOR I=2040 TO 2947 :POKE I,13:MEXT I 

175 REM SFRITE COLORS 

144 FOR 12532287 TO 338984:POKE 1,4:МЕХТ I 

145 РЕМ HOR'TZQhNTa*L POSITIONS 

154 FOR I-0 TO.14 STEP 2:РОКЕ 53248+1,24+12%1 
:МЕХТ I 

155 REM VERTICAL POSITIONS 

168 FOR 12532849 TO 52262 STEP 2:РОКЕ 1,60:МЕХТ 1 

тад POKE 53268,255:КЕМ ENABLE SPRITES 

510 POKE 56333,127:REM TURN OFF INTERRUPTS 

520 REM CHANGE 186 INTERRUPT VECTOR 

S29 POKE 788,0:ҒОКЕ 789,192 

man POKE 52055 ,РРЕК‹ 53265) АМ•№М 127 

560 REM FIRST INTERRUPT AT LINE 100 

"59 РАКЕ 53266,100 
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тл REM EPIBLE INTERRUPTS АМО RASTER ONES 
за PAKE 26333,129: РОКЕ 53874,123 

за REM ANIMATE HELICOPTER 

О FOKE 8З2,ПІРОКЕ 834,0 

10 FOR TO ЗО:МЕХТ I 

828 POKE 823,255:РОКЕ 934,955 

еза FOR 128 TO SO:NEXT I 

бал SITO RAO 

апй REM RASTER INTERRUPT 

{QMO рата 173,25,208,41,:,208,3,76 

1005 DATA 33,234,141,285,208,173,18,202,48,34 
i810 ORTA 169,160,141,13,208,168,100,141 
1915 CATA 1,208,141,3,208,141,5,208,141 
1020 пата 7,208,141,9,202,141,11,203 

1025 DATA 141,13,208,141,15,208,76,188,254 
1930 DATA 169,90,141,15,208,169,S0,24 

1035 DATA 144,213 

зада REM SPRITE рата 

2018 DATA 0,255,255,8,9,128,96,0 

2815 DATA 123,194,1,248,159,255,290,193,255,254 
TOCA рата а,14,127,0,6,127,8,3 

г>азт рата e54,0,0,32,0,15,2855 


a 
о 


ton 


поо ar 
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The machine language source code for this program is included as а 
matter of interest for machine language programmers: 


10 irqint lda #4919 

2 газа interrupt status register 

ag and #1 

40 215 it а raster interrupt? 

50 | bne 11 

60 :if not then jump to normal interrupt 
routine 

ға jmp Феазі 

80 ггезећ raster interrupts 

за i! sta 49913 

199 fFeurrent raster line 

116 lda #d012 

190 ;branch if greater than 128 

130 bmi i3 

148 enext interrupt at line 

150 lda #150 
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sta #050912 
Sprite vertical position 


1аз #190 
?sprite vertical registers 
із ata #3981 


sta #0703 
sta $90975 
ata 9997 
eta #4209 
ta dab 
ta #3084 
sta $dOOf 
^normal interrupt exit routine 
jmp #febc 
inant raster at line 99 
i lda #90 
sta +$9й12 
sprite vertical position 
lda #58 
cle 
rrelative branch 
bee іг 


SPLIT SCREEN 


1880 
1010 
1928 
1738 
1948 
1958 
1069 
1п?а 
Lase 
1939 
11288 
1118 
112@ 
1130 
1140 
1158 


REM READ ІМ INTERRUPT ROUTINE 

FOR 1=0 TO S93: READ А:РОКЕ 48152+1,А: МЕХТ 
РОКЕ 36333,127:REM DISABLE INTERRUPTS 
PNKE?733,0:POKE739, 192 

REM CHANGE IRQ INTERRUPT VECTOR 
POKES%3265 ,РЕЕК‹ 353265 АМО 12 7 

REM FIRST RASTER INTERRUPT AT LINE 30 
РОКЕ 53286,30 

КЕМ TURN INTERRUPTS ON 

РОКЕ 56333, 129:РОКЕ5З274, 1029 

POKE 53281,0:ВЕМ RACKGROUND COLOR 
BA-2«4036:REM BIT MAP BASE 

REM CLEAR BOTTOM HALF OF BIT MAF 

FORT =64+3520TORAt173993 :РОКЕТ, В: НЕХТ 
REM SET COLORS 

FOR І-1504 ТО 22243:POKEI,16: NEXT 
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саса FOR X=ØTO213STEP.5:REM DRAW CURVE 
2010 Y=RESC INTC 90 +89 жЯЕ$\ SIN 5,/102222 
2020 CH=INTC КАЗ > 

2038 КО= ИТ ҮЗ» 

2248 LN=YAND? 

2657 BY=BAtRO*e320+34CHtLN 

26080 BI=7-¢ SAND?) 

2070 POKEBY,PEEKC BORC 27В12 

гаве NEXT X 

30600 PRINT"Z":LIST 

2088 DATA173,25,208,491,1,208,3,76 

5010 пАата48,ғР34,141,ғ25,208,173,18,Р08 
"029 пата48,21,173,17,208,41,95,141 
зоза патя17,208,168,21,141,24,208,163 
5040 ОҺТА145,141,18,208,76,188,254,173 
5050 DATAI?,208,9,32,141,17,208,169 
5060 патаг5,141,24,208,169,30,141,18 
50780 DATA298,76,188,254 


The machine language source code for this program is included 
as a matter of interest for machine language programmers: 


10 splitint lda $1919 
га fread interrupt status register 


30 and #1 

ас bne int] 

50 :if not raster interrupt go to normal routine 
eo jmp ФеаЗ1 

70 reset raster interrupts 

за int! sta #9013 

ЭВ sread raster register 

100 lda жабісг 

118 ;branch if greater than 128 
128 bmi inte 

130 ‘turn off bit map 

140 lda $40911 

150 and #35 

160 sta #9011 

170 ;reset char base 

129 lda #21 

1920 sta $4018 

200 :next interrupt 

218 Ilda #145 


150 


220 
оза 


texit 


Sturn 
inte 


sta $49912 
interrupt routine 
jmp ФҒеБс 
on bit map 
lda $d011 
ora #32 
sta $d011 


change char base 


next 


jexit 


lda #25 

sta $9918 
interrupt 

lda #30 

sta $4012 


jmp ¢febc 


151 


СНАРТЕН 7 


EXTERNAL DEVICES 


The Commodore 64 system can be upgraded with the addition of 
external devices (peripherals). In this chapter we will describe the more 
common of these devices - the Datasette, floppy disk drives and printers. 


DATASETTE 


This is the most economical method of data storage. Its disadvantages, 
in comparison to disk drives, are that it is relatively slow and can only 
store program and data files sequentially. So, to access a file that has 
been passed on the tape, you must manually rewind it. It is a good idea to 
keep a record of the locations of programs with the tape counter so that 
they can be quickly located. For the same reason it is best to use short 
tapes. Even fast forward takes a lot of time to run through a 90 minute 
tape. 

Unlike most microcomputer systems the Commodore 64 requires a 
particular cassette recorder, the Datasette. This has circuitry which 
enables the Commodore 64 to sense whether certain keys are 
pressed. It can therefore prompt the user when the required key is not 
pressed. Unfortunately it cannot discriminate between record and play 
modes. This means that it is still possible to inadvertently write over 
programs you had meant to read. 

Write-protecting tapes 

On the near edge of cassettes you will find two write-protect tabs, one for 
each side of the tape. Breaking these out will lock out the RECORD key, 
so you will be unable to write onto that side of the tape. Use this method to 
protect programs with which you do not want to run the risk of overwriting. 
You can reverse the write-protect by placing a piece of tape over the 
write-protect opening. 

Care of tapes 

Avoid touching the tape surface. The oils on your skin can destroy the 
oxide coating, thus corrupting your data. Store cassettes away from 
magnetic fields, which can also corrupt data. Television sets produce 
quite a strong magnetic field, so don't store tapes on or near them. 
Relevant BASIC commands 

SAVE, LOAD, GET#, INPUT#, OPEN, CLOSE 


FLOPPY DISK DRIVES 


The Commodore 64 can use any of the Commodore disk drives, but the 
model 1541 is designed to connect directly to the Commodore 64. Other 
models need an interface cartridge. 
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Disk drives are more flexible and provide faster access than the 
Datasette. They can store and access data randomly on any part of the 
diskette surface. Their disadvantage is that, being precise electro- 
mechanical devices, they are expensive. 

Diskettes come in a protective jacket. Under no circumstances should 
the diskette be removed from this jacket. 

Data storage on diskette 

Each diskette used by the 1541 consists of 35 concentric circles called 
tracks. Each track is broken up into sectors, each of which holds 256 
bytes. 

Tracks 1-17 have 21 sectors/track 

Tracks 18-24 have 19 sectors/track 

Tracks 25-30 have 18 sectors/track 

Tracks 31-35 have 17 sectors/track 

Thus 1 1541 diskette can hold 174,848 bytes (170.75K) 


Types of diskette 

If you rotate the diskette within its jacket you will find one or more holes 
which align with the small hole in the jacket. If there is only one hole, the 
diskette is soft-sectored. If there is more than one hole, the diskette is 
hard-sectored. The 1541 drive uses only soft-sectored diskettes. 


Loading and Unloading Diskettes 


0 


Read/write slot 


| 


ШИН insert into drive 


To load a diskette, gently slide it, in the orientation shown above, into the 
drive slot until it clicks in. Close the slot door. The drive will not operate 
with the door open. 

To unload, press the slot door down and release. The door will open and 
the diskette will be ejected an inch or so. Remove it carefully. 

There are two indicator lights on the drive. The green one is a power-on 
indicator. The red one lights only when there is some disk activity. 


Formatting Diskettes 


Before use, a new diskette must be formatted. This writes a disk name, 
ID number and track and sector information onto the diskette. Formatting 
is done by the commands: 


Soft/hard sector hole 


Write protect hole 
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ОРЕМ 1,8,15 

PRINT#1, “NEW : diskname, ID" 
The diskname can be any string up to 16 characters long. The ID number 
should be different for every diskette. 
A shorter version of the format command used on diskettes which have 
previously been formatted will erase all data on the diskette and rename 
it, leaving the ID number unchanged. 

OPEN 1, 8, 15 

PRINT#1, "NEW : аіѕкпате" 
Note: NEW may be abbreviated to N 


Block Availability Map (BAM) and Initialization 
The ВАМ is found on track 18. it contains memory allocation information 
used when the disk drive is accessed.Each time this happens, the drive 
compares the ID number on the diskette with the ID number held in drive 
memory. If they don't match, the drive loads the diskette BAM into drive 
memory and uses this copy to access the diskette. This copying is called 
initialization. If the ID numbers match, initialization is not carried out. This 
is why different diskettes should be given different ID numbers. If they're 
not, the situation could arise where the BAM for another diskette with the 
same ID number is used to access a diskette. At best this will cause 
searches to be unsuccessful. At worst programs will be overwritten. 
However, if you have given diskettes the same ID numbers, you can 
force the drive to copy the BAM using the following: 

OPEN 1,8,15 

PRINT#1 “INITIALIZE” 
This can be abbreviated to: 

OPEN 1,8,15, 1" 
Diskette Directory 
This is located on track 18. It contains the names, starting sector 
addresses and file types of all files on the diskette. It can be displayed 
using the following commands 

LOAD "$",8 

LIST 


Write-protecting Diskettes 


Like cassette tapes, diskettes can be write-protected. This is done by 
covering the write-protect slot on the edge of the diskette jacket with 
tape. Removing the tape restores the diskette to read/write condition. 


File Manipulation Commands 

Renaming files. 

This is done with the commands: 
OPEN 1,8,15 
PRINT#1, "RENAME : NEW—NAME-OLD—NAME 
R is an acceptable abbreviation for RENAME 
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Erasing files 
This is done with the commands: 
OPEN 1,8,15 
PRINT# 1, “SCRATCH : FILENAME" 
S is an acceptable abbreviation for SCRATCH 
Copying files 
This is done with the commands: 
OPEN 1,8,15 
PRINT# 1,"COPY : NEW—NAME = OLD- NAME" 
C is an acceptable abbreviation for COPY 
Joining files 
This is done with the commands: 
OPEN 1,8,15 
PRINT# 1,"COPY : NEW—FILE=FILE1,FILE2 
Note: Disk command strings must not be greater than 40 characters in 
ength. 
VALIDATE 
This command does housekeeping on the diskette, deleting any files that 
were not properly closed, and freeing blocks which may have been 
allocated as temporary storage but are not now associated with any file. 


Multiple Disk Systems 
If you have a multiple disk system you may need to assign different 
device numbers to the different drives. At power-up they are all device 
number 8. Drives can have device numbers 8, 9, 10 and 11. To change 
the device number: 
1) Turn off all drives but the one you are changing 
2) Openacommand file to the device 
e.g. OPEN 1,8, 15 

3) Type PRINT# 1, "M-W" СНН% (119) СНА$ (0) СНН% (2) СНА$ 

(new-device-number + 32) CHR$ (new-device-number + 64) 
Leave that drive on. Turning it off will erase the new device number. Turn 
on the next drive you want to change. This is now device 8 so you already 
have a command channel open to it. If you want to change it or have more 
drives be sure to use a different device number. 
Closing Disk Files 
When a program writes to, or reads from, a disk, the data is first placed in 
a buffer. Only when the buffer is full is the data actually written to the 
diskette or, only when it is empty is more data read in. Thus, if you finish 
writing to the disk with the buffer not full, this data will not be stored on 
disk. To avoid this, you must close the file. This automatically 
writes the buffered data to disk, whether or not the buffer is full. 


155 


Maximum Number of Opened Files 


The Commodore 64 can only handle 10 open files at a time, and only 5 of 
these to disk. It is therefore a good idea to close all files immediately after 
use. ; 


Disk Data Files 


Three types of file can be stored on disk. Program files have already 
been dealt with. The other two are sequential and random access files. 
Sequential Files 

These must first be opened using the following format: 

OPEN |, dev, sa, “dn: filename, SEQ, W” 


If - logical file number 

dev - device number 

sa - secondary address 

dn - drive number - this may be omitted on single-drive systems 
SEQ - indicates sequential file 

W - indicates write mode - it can also be R for read. 


e.g. OPEN 1, 8, 4, "0: RECIPES, SEQ, W" 

To overwrite an existing file use an “@" before the drive number. 
e.g. OPEN 1, 8, 4, “90: RECIPES, SEQ, W" 

This also applies to program files. 

e.g. SAVE "@0 :PROG-NAME", 8 


Random Access files 
These are created by directly addressing diskette sectors and memory 
buffers. There are 8 buffers available on the Commodore 64 but 4 of 
these are used by the BAM, variable space, command channel I/O and 
the disk controller, so don't open more than 4 buffers at a time. The 
format for opening a random access file is as follows: 

OPEN If,dev,sa,"#buff nr" 


If - logical file number: 2-14 for data transfer, 15 for utility 
commands (see below) 

dev - device number 

sa - secondary address (2-14) 


buffnr - buffer number. This can be ommitted as the Disk Operating 
System (DOS) will automatically select one. 

Information is written to random access files using the PRINT# 

command 


Disk Utility Instructions 


Block-Read 
Purpose - reads any sector into one of the memory buffers 
To use - 1) Openacommand channel 


OPEN 15,8,15 
2) Openadirect access channel 
e.g. OPEN 2,8,4,"#" 
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3) Specify track and sector and read it in. 
PRINT£2 15,"B-R:"sa;dn;T;S 
sa - secondary address from 2 above 
dn - drive number - mandatory when using direct 
access commands 
You may now use GET# and INPUT# to get the data from the buffer. 
e.g. GET£2,B 
Check ST for end of data 
Close all files when you are through. 
Note: B-R is an acceptable abbreviation for BLOCK-READ 


BLOCK-ALLOCATE 

Purpose - checks a sector to see whether it is availabe or 
already allocated. If available it marks it in the BAM 
as allocated. If already allocated, it leaves the BAM 
unchanged and returns the next available track and 
sector in the error channel. If no sector is available it 
returns track 0, sector О, which is non-existent. If the 
sector you initially asked for is available the message 
'OK' is returned in the error channel. 

То use - 1) Opencommand channel 
OPEN 15,8,15 
2) Specify track and sector and check it. 
PRINT#15,“B-A":0;T;S 
T - Track number 
S - Sector number 
3) Check error channel 
INPUT#15,E,EM$,T,S 
E - error code 
EM$ - error message 
T - track 
S - sector 
Proceed on the basis of the error channel return. 
4) Close channels 

Note: B-Ais an acceptable abbreviation for BLOCK-ALLOCATE 


BLOCK-WRITE 

Purpose - To write data to a sector specified by you. With this 
instruction you can write to the BAM or the directory, 
thus destroying them, so it is wise ro use a BLOCK- 
ALLOCATE first, to find a free sector. 

To use - 1) Do a BLOCK-ALLOCATE (not mandatory, but 
wise) 
2) If ЕМ$='ОК’ or other free sector returned, 
continue 
3) Open direct access file 
e.g. OPENS3,8,4," 4" 
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4) PRINT# the data - from DATA statements, 
arrays keyboard 
e.g. PRINT#3,A 
5) The data is now in the buffer. To block-write it 
use: 
PRINT£15,"B-W:"4;0;T;S 
6) Close files 
Note: 1) The format for the BLOCK—WRITE instruction is the same 
as for BLOCK-READ 
2) B—Wis ап acceptable abbreviation for BLOCK-READ 


BUFFER-POINTER 


Purpose - To change the buffer pointer to start GETting at a 
particular byte, rather than starting at the first byte in 
the buffer 

To use - 1) Doablock-read to the point where you are about 
to GET# bytes 


2) Change the buffer pointer 
e.g. PRINT#15,"B-P:"sa;byte 
Sa - secondary address used in setting up the direct 
access file 
byte - number of byte you want to start GETting at 
e.g. PRINT#15,“B-P:"4:47 
Note: B-P is an acceptable abbreviation for BUFFER-POINTER 


BLOCK-FREE 


Purpose - tode-allocate any block on the disk. 
To use - 1) Opencommand channel 
OPEN15,8,15 


2) Specify track and sector and free it 
PRINT#15,"B-F:"dr:T;S 
dr - drive number 
T - track number 
S - sector number 
e.g. PRINT£415,"B-F:"0;1;4 
Note: B-F is an acceptable abbreviation for BLOCK-FREE 


Disk Drive Memory Manipulation 

The 1541 drive controller contains a 6502 microprocessor. It has 2K of 
RAM and DOS, which resides on ROM. Some of the RAM is used for 
housekeeping. The rest is used for buffers. This is also available to the 
programmer for machine code programs. 


The buffers are: 
Buffer Address (hex) 
1 300 - 3FF 
2 400 - 4ЕЕ 
3 500 - 5FF 
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4 
5 


600 - 6FF 
700 - 7FF 


Buffer 5 is often used by DOS, so it is not advisable to use it for machine 
language programs. If you intend to use buffer space for machine code, 
specify the buffers you want for direct access files, rather than leaving it 
up to DOS which may overwrite your machine code if left to its own 


devices. 


MEMORY-WRITE 


Purpose - 
То иве - 


to store machine code іп drive memory 

a singe M-W commands allows you to store up to 34 
bytes 

All the data must be transferred as character strings 
using СНА$ 

The number of bytes to be stored must be indicated 
ONLY the abbreviation M—W сап be used. 
MEMORY-—WRITE, in full, is unacceptable 

The machine code must end with an RTS instruction. 
Otherwise the 1541 may loop endlessly, or do 
something catastrophic to the data on the diskette. 


1) Open command channel and transfer data 


MEMORY-READ 
Purpose - 


To use: - 


OPEN 15, 8, 15 

PRINT# 15, "M-W" CHR$ (LO-ADDRESS-BYTE) 
CHR$ (HI-ADDRESS-BYTE) CHR$ (NR-BYTES- 
TRANSFERRED) CHR$ (BYTE-1) CHR$ (BYTE- 
2)... 
CLOSE 15 


to read data from drive memory one byte at a time 


The byte read is transferred through the error channel 
so use GET # 15 to get it 

ONLY the abbreviation M-R is acceptable. MEMORY- 
READ, in full, is not 

The address to be read is specified using CHR$, as 
for MEMORY-WRITE 


1) Open command channel 


OPEN 15,8,15 


2) Specify address and read 
PRINT 4 15, "M-R"CHR$(LO-ADDRESS-BYTE) 
CHR$(HI-ADDRESS-BYTE) 


GET#15,A$ 
PRINTAS 
CLOSE 15 
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MEMORY-EXECUTE 


Purpose - torunamachine language program loaded into drive 
memory by MEMORY-WRITE 

To use - ONLY the abbreviation M-E is acceptable 
1) Open command channel 
OPEN 15,8,15 


2) Specify start address of routine and execute 
PRINT 2 15,"M-E"CHR$(LO-ADDRESS- 
BYTE)CHR$(HI-ADDRESS-BYTE) 

3) Close channel 


CLOSE 15 

User Commands 

U1 

Purpose - similar to B-R. The only difference is that U1 reads 
the 2 bytes preceding the data in the sector. These 
bytes are the link address to the next sector in the file, 
giving track and sector. 

То use - same as B-R, but replace B-R with U1. 

U2 

Purpose - Similar to B-W. The difference is that B-W terminates 
the file at the sector written. U2 allows you to write the 
link address, ie. track and sector - to the next sector 
in the file 

Touse - same as B-W but replace B-W with U2 

U3-U9 

Purpose - similar to M-E but they cause a jump to specific 
locations as given below: 
U3 $0500 
U4 $0503 
U5 $0506 
U6 $0509 
U7 $050C 
U8 $050F 
09 ФҒҒҒА 
These locations are only 3 bytes long as they аге 
intended to hold a JMP instruction to a location the 
programmer defines. 

U (or UJ) 

Purpose - jumps to DOS to its power-up routine 

To use - all the U3-J commands have the following syntax for 
use: 
OPEN 15,8,15 
PRINT 15,"U4" 
CLOSE15 
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The 1515 Graphic Printer 


This has a built in character set including upper and lower case letters, 
numbers and graphics. To access the printer you must first open a file to 
it using the following syntax: 

OPEN If,dev,sa 


If - logical file number (0-255) 

dev - device number - either 4 or 5 - it is selected using a switch at 
the rear of the printer 

sa - used to select between character sets. If omitted the 


default character set (upper case & graphics) is used. 

If sa = 7 the alternate character set (lower case) is selected. 
Having opened a channel to the printer you now use PRINT# If to print 
your data. 


Print Formatting 


Comma 
If the PRINT# data items are seperated by а comma the print puts 11 
spaces between items printed. 


Semicolon 
This has the same effect as it does on a screen display 


TAB and SPC 

These cannot appear immediately after a PRINT 

ie. РНІМТ%1,ТАВ(6) is illegal; PRINT#1,“";TAB(6) is ОК 

On the printer, both TAB and SPC have the same effect as SPC does on 
the screen display 

POS 

This reproduces the screen TAB function on the printer. That is, it starts 
printing at an absolute position rather than relative to where the current 
printing is being done. 

POS is sent to the printer as CHR$(16). The two characters immediately 
following this determine the print position. | 
e.g. PRINT#1,CHR(16);“16";“starts printing at column 16" 


Printer Graphics 


The printer has several modes, in which characters received are treated 
differently. The modes and commands to get into them are shown below: 


Mode Command 
Double-width characters CHR$ (14) 
Single-width characters CHR$ (15) 
Reverse characters CHR$ (18) or"[CTRL] [RVS ОМ)” 
Normal characters CHR$ (146) or "CTRL] [RVS OFF]" 
Graphics СНН8 (8) 
Alternate character set CHR$ (17) 
Standard character set CHR$ (143) 
Repeat Graphics CHRS$ (26) 
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These are used in PRINT# statements 

e.g. PRINTZ1,CHR$(17);"LOWER CASE" 

Apart from the following two, the functions of the modes are obvious 
GRAPHICS mode 

This is similar to defining custom character sets in character memory in 
that it creates patterns of dots. However, in printer graphics, rows not 
columns are given values, as below, and columns, not rows, are added. 


COLUMNS 

A BC DEF С Н 
1 
2 
4 
Row 8 

values 

16 
32 
64 

Column values 64 64 126 126 126 126 64 64 


Note that only 7 rows are used. 
To print this character do the following: 
OPEN# 1 , 4- open a channel to the printer 
PRINT# 1, CHR$ (8) - get into graphics mode 
PRINT# 1, СНН% (64 + 128) ; СНА$ (64 + 128); СНН% (126 + 
128); CHRS$ (126 + 128) ; СНА$ (126 + 128) ; СНАЗ (126 + 128); 
СНН8 (64 + 128) ; СНН% (64 + 128) 
Note that the column values are added to 128. It would of course have 
been simpler to put the column values ina DATA statement and read and 
PRINT#ed them in a loop. 


Repeat Graphics Mode 
This mode allows you to repeat a pattern of seven vertical dots up to 255 
times per command. 
e.g. OPEN 1,4 - open а channel to the printer 

PRINT# 1, CHR$ (26) СНН% (5) СНН% (255) 
the first CHR$ value puts the printer into repeat graphics mode. The 
second СНА value sets the number of repeat(s). The third CHR$ value 
defines the vertical dot pattern (in this case just a solid bar 7 dots high) 
These two lines will just cause 5 bars to be printed. There is no space 
between them, they're continuous. 


Games Controls 


There are three types of games controls in common use - the keyboard, 
joysticks and paddies. This section describes these, and how they are 
used. 
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Keyboard 


This is the most common device for games control. Keys are assigned to 
various functions, such as move left, move right, fire, etc. 


When choosing keys for your games, ensure that they are easily usable. 
Their position should reflect their function. For example, if you have 4 
keys for up, down, left and right, use keys in corresponding positions, as 
below: 


The space bar makes a good fire button since it's large and hard to miss. 
It is annoying to have to repeatedly press and release keys to repeat an 
action, so you should set all keys so that they automatically repeat when 
held down. This is done by POKEing 128 into byte 650. POKEing O into 
this byte makes only the cursor control keys repeat automatically. 


Checking the keyboard. 

GET is the command to use to check the keyboard, as it doesn't echo the 
character typed in, or stop the program to wait for input. It merely checks 
the keyboard buffer and continues. If there is no character in the buffer 
the GET variable is set to 0 or the null string. If there is a character in the 
buffer it is assigned to the variable and the buffer is cleared. The GET 
variable should be a string variable, since this will accept almost any 
keystroke (except STOP, RESTORE,SHIFT, CTRL, «Ж and the colour 
control keys). If a numeric variable is used you will only be able to GET 
numeric characters without causing an error. 


Having got the character, the program must decide what to do. This can 
be done in various ways. 
(i) Repeated IF-THEN- 
e.g. 10GETKS 
20 IF K$ = "S" THEN - : СОТО 70 
30 IF K$ = "E" THEN - : GOTO 70 
40 IF K$ = "X" THEN - : GOTO 70 
50 IF K$ = “F” THEN - : GOTO 70 
60 IF K$ = "" THEN - : GOTO 70 
70 
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The statements after the THEN may carry out the required actions and 
then branch past the rest of the IF statements. If the actions required are 
too complex to fit on a line, the program may GOTO or GOSUB a section 
of code to carry out the actions. 

(ii) ON-GOTO- 

If you are using many keys, going through all the IF statements may be 
too time-consuming. It may be quicker to use some calculation or ASCII 
values with an ON statement. The disadvantage of this technique is that 
the ASCII values of the characters you are using may be widely 
seperated, necessitating complex calculations which take as much time 
as stepping through the IF statements. 


Joystick 
This consists of a moveable stick and a fire button. When moved, the 
Stick closes 1 or 2 of 4 switches. 


Left | O + O | Right 


Down 


If the stick is moved upor down orto one side, only one switch is closed. If 
itis moved diagonally, the two switches it moves between are closed. 


The state of the switches can be discovered by PEEKing certain memory 


locations. Each switch controls one bit, delivering a 0 when the switch is 
closed, a 1 when the switch is open. 


7 6 5 4 3 2 1 0 


(Bits used by location 56320 and 56321 for joystick ports 1 and 2 respectively) 


Since the program must check individual bits, bit masks must be used. 
For example, to check the fire button bit — only use: 
FB = PEEK (56320) AND 16 


If FB = 0 then the Fire button has been pushed. 
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The joystick direction is checked by using the following statement: 
DIR = 15—(PEEK (56320) AND 15) 


The direction is determined by the following table: 


= 
2 


0 

1 

2 

3 

4 

5 Up and Left 

6 Down and Left 

7 = 

8 Right 

9 Up and Right 
10 


Down and Right 


The following program demonstrates joystick control: 


10 REM ж JOY STICK DEMO ж 

20 FOR P=9 TO 19 

20 READ X,Y 

40 ХЖ<Ро-СНВФОЯ2 : ҮФСР?ә=СНЕФ‹ У) 

50 NEXT Р 

га DATA 0,0,0,145,0,17,0,0,157,0,157,145,15T7, 
17,9,0,29,0,29,195,29,17 

100 JOY=S56229 :PRINT CHR$X 1472 

110 РВІМТ"Х";СНК%С 1579; 

120 IF СРЕЕКС Ј0Ү› АМО 16›=0 THEN РКІМТ"Ө"; 
CHRSX 1572; 

130 P=15-¢ PEEKS JOYIAND15> 

140 PRINT " "CHRE 1570? RECP) ҮФСР9; 

158 GOTO 118 


Paddles 

Paddles are used in place of joysticks where a variable control of 
direction is needed (e.g. moving a racquet up and down the screen for 
tennis, etc.). Each port can take two paddles, one for the x-direction and 
one for the y-direction. 

The paddles are read into memory locations 54297 and 54298. These 
are the sound chip's paddle read registers. 

A paddle set to zero position and rotated through to its maximum rotation 
will return values from 0 to 255 in increments of 1. Owing to such a large 
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range of possible output values and the rate that they can change, it is 
impossible for BASIC to keep up with the paddles. 

However, the 'REGLINK' routine used in the Sound chapter can be 
modified to link the output of the paddles to the x and y co-ordinates of a 
Sprite. Use the following method to link Sprite#0 to the paddles. 


Connect paddles to port labelled 'Port-2' 

. Load ‘REGLINK’ (listed on page 67) and change Line 11010: 
110 DATA 208 

. RUN "REGLINK" with the above change 

. LOAD “SQUARE” from Graphics chapter (listed on page 94) 
Type: POKE 820, 0 : POKE 821, 1 

RUN Square 


ол wc 


You should be able to move the Sprite square around the screen 
independently of the operating system. 
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Appendix А 
1) СНЕФ Value Codes 


CHR$ CHR$ 

Character Code| Character Code 
о # 39 

1 $ 5% 

2 * 37 

STOP 5 & 58 
4 > 59 

WHITE 5 ( 40 
6 ) 41 

7 * 42 

8 * 43 

9 , 44 

11 - 46 

12 / 47 

RETURN 15 о 48 
Lower case switch 14 1 49 
15 2 90 

16 S 51 

свак > 17 4 22 
RVS ON 18 5 55 
CLR/HOME 19 6 24 
INST/DEL 20 7 55 

21 в 56 

22 9 57 

2x 2 58 

24 3 59 

25 < 60 

25 = 61 

27 » 62 

RED 28 ? 63 

CSRS У 29 а 64 

GREEN 30 А 55 

BLUE 31 B 66 

space 32 С 67 

a 55 D 68 

E 69 
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Character CHR$ | Character CHRS 
Code Code 
F 70 109 
G 71 110 
H 72 Li 111 
I 73 M | 112 
J 74 BEI 113 
K 75 єз 114 
L 76 v 115 
M 77 JT 116 
N 78 Га 117 
0 79 118 
Р во ге: 119 
Q 81 < 120 
R 82 CI 121 
S 85 Ф 122 
T 84 ЕН 123 
Uu 85 E] 124 
у 86 че 125 
ы 87 ar 126 
X 88 rea 127 
Y 89 128 
Z 90 129 
LE 91 130 
ғ 92 | SHIFT RUN/STOP. 131 
J 93 132 
T 94 |f1 133 
€- 95 | ЯЗ 134 
а 96 | f9 135 
e 97 +7 136 
qi 98 +2 157 
=з 99 ғ4 158 
ші 100| +6 159 
сә 101 | +8 140 
кш 102| SHIFT RETURN 141 
1: 105| Upper case switch142 
ГІЗ 104 143 
Б1 105 BLACK 144 
СУ 106 | CRSR т 145 
Р] 107 RVS OFF 146 
ІЗ 108 CLR/HOME 147 


Character 


INST/DEL. 


PURPLE 
CRSR € 


CHRS 
Code 


148 
149 
150 
151 

152 
153 
154 
155 
156 
157 
158 
159 


160 
161 
162 
163 
164 
165 
166 
167 
168 
169 


Character CHR$ 
Code 


Ф 
Бы 
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рвов 
| 


“SOBRE 
Lond = 
КЕК 
025-і 


"а 2. ри = 
іш: 
к. de 
о 0 
N ~ 


= 183 
186 
187 


189 
190 


Че 
5 


Codes 192-225 are the same as 96-127 
Codes 224-254 are the same as 160—190 


Code 255 is the same as code 126 


2) Screen Codes 
Character 


Character 
Set 1 


omnmootunbpeo 


Set 2 


wna hands 
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Screen 
Code 


ч.ла-омыео 


041 


е ~ 


+ 
< 
a | 


TENA ~ Ф + 


v. 
M 


a 
a 2eds 


~ 

те 
СзүуүчеЕСспАОстьйы>32х>м 
pone ГГА ТАССО ы ТЕ 


apo) г 388 Т 388 
чәә 2195 4a} 3e еч) 43338 еч) 


Character Character Screen 
Set 1 Set 2 Code 


Өл vi^ о QONOUAWNE о 


= 
^ 


..... 


Ф. 
H 
. 
3 


Ј 


EESTI 
€c-Hnxxovozazxrxco-rgogmmoomgp 
~ 
` 
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Character 
Set 1 


29444. 


” s [ 
und E Ser da 


Шен, үр 


| ЗЮВЫГ. 


7 т ра пч 
im ‹..: 5. 


pant 


Character 


Set 2 


м< > Е 


aS 
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Screen 
Code 


87 


Character Character Screen 
Set 1 бет 2 Code 


EI 126 
РЫ 127 


Codes 128-255 produce reversed images of 
codes 0-127 


3) ASCII Codes 


Character Code Character Code 
NULL. о 65 29 
бан 1 RS 50 
STX 2 US 31 
ETX 5 space 32 
ЕОТ 4 | 55 
ENQ 5 "t 34 
АСК 5 # 55 
BEL 7 $ 56 
BS 8 * 57 
HT 9 & 38 
LF 10 : 39 
VT 11 ( 40 
FF 12 ) 41 
CR 13 4 42 
50 14 + 43 
SI 15 s 44 
DLE 16 = 45 
DC1 17 . 46 
DC2 18 / 47 
DC3 19 о 48 
DC4 20 1 49 
NAK 21 2 50 
SYN 22 3 51 
ETB 23 4 52 
CAN 24 5 55 
ЕМ 25 6 54 
SUB 26 7 55 
ESC 27 8 56 
FS 28 9 57 
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74! 


9% a2eds 

G6 > 

t6 + 

£6 C 

Z6 \ 

TS 7 

06 Z 

68 A 
121 чаа 88 X 
921 < 48 М 
бет = 98 ^ 
Ут > св n 
EZT £ 78 1 
202,1 2 £8 S 
тет А св ч 
оёт х тв © 
611 м o8 d 
art ^ 64. 0 
111 п 84 М 
отт 3 LL Ж 
STT S 97 - 
УТТ 2 GZ » 
ETT b LZA r 
СТТ а €L I 
TTT о ZL H 
OTT u TZ Я 
бот w (074 А 
вот t 69 3 
LOT 3 89 a 
9ot С 19 ғ) 
сот т 99 а 
РОТ Ч G9 9 
сот Б v9 e 
201 + eg 4, 
TOT a &9 < 
OOTI p I9 = 
66 3 09 » 
86 q 65 5 
16 е ве = 


арод 4932e aeu?) apog 4333526 4e 4J 


Appendix В 
Complete Memory Мар 


Address Description 

(Decimal) 

0 Chip directional register 

1-2 Memory and tape control 

3-4 Floating point - fixed point vector 

5-6 Fixed point - floating point vector 

7 BASIC counter. Search character ':' or end of line 

8 Scan-quotes flag 

9 Column position of cursor on line 

10 Flag ; 0 = LOAD, 1 = VERIFY 

11 BASIC input buffer pointer ; subscript number 

12 Default DIM flag 

13 Variable type flag : FF = string, O0 = numeric 

14 Numeric type flag : 80 — integer, 00 — floating 
point 

15 DATA scan flag : LIST quote flag ; memory flag 

16 Subscript flag ; FNx flag 

17 Flag ; 0 = INPUT, 152 = READ, 64 = GET 

18 ATN sign flag ; comparison evaluation flag 

19 Current МО prompt flag 

20 - 21 Where BASIC stores integers used in 
calculations 

22 Temporary string stack pointer 

23-24 Last temporary string vector 

25 - 33 Stack for temporary string descriptors 

34-37 Utility pointer area 

38 - 42 Product area for multiplication 

43-44 Pointer to start of BASIC program 

45 - 46 Pointer to end of BASIC program ; start of BASIC 
variables 

47 - 48 Pointer to end of variables ; start of arrays 

51-52 Pointer to start of string storage - strings move 
down from top of available memory towards 
arrays. 

53-54 Pointer to end of string storage 

55-56 Pointer to top of RAM available to BASIC 

57 - 58 Current BASIC line number 

59-60 Previous BASIC line number 

61-62 Pointer to BASIC statement (for CONT) 

63-64 Current DATA line number 

65-66 Pointer to current DATA item 

67 - 68 Jump vector for INPUT statement 

69-70 Current variable name 
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71-72 
73-74 
75-76 
77 
78-79 
80-81 
82 

83 
84-86 
87-96 
97 - 102 


103 
104 
105-110 
111 
112 
113-114 
115-138 


139 - 143 
144 
145 
146 
147 
148 
150 
151 
152 
153 
154 
155 
156 
157 
158 
159 
160 - 162 
163 
164 
165 
166 
167 
168 
169 
170 
171 


Current variable address 

Variable pointer for FOR/NEXT statement 
Y save ; operator save ; BASIC pointer save 
Comparison symbol 

Work area ; function definition pointer 

Work area ; string descriptor pointer 

Length of string 

Garbage collect use 

Jump vector for functions 

Numeric work area 

Floating point accumulator 1 ; Exponent, 4 byte 
Mantissa, Sign 

Series evaluation constant pointer 
Accumulator 1 overflow 

Floating point accumulator 2 

Sign comparison - Acc 1 with Acc 2 

Acc 2 rounding 

Cassette buffer length ; series pointer 
CHRGOT BASIC subroutine - gets next BASIC 
character 

RND storage and work area 

ST - status byte 

STOP and REVERSE flags ; Keyswitch PIA 
Timing constant for tape 

Flag :0 = LOAD, 1 = VERIFY 

Serial output ; deferred character flag 

Tape EOT received 

Register save 

Number of OPEN files 

Current input device 

Current output (CMD) device 

Tape character parity 

Flag : byte received 

Output control flag : direct = 128 ; run = 0 
Tape pass 1 error log 

Tape pass 2 error log 

Jifie clock - ТІ and TI$ use this 

Serial bit count 

Cycle count 

Tape write bit count 

Pointer to tape buffer 

Tape write count ; input bit storage 

Tape write new byte ; Read error ; input bit count 
Write start bit ; Read bit error 

Tape scan ; count 

Write read length ; Read checksum ; parity 
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172-173 
174-175 
176-177 
178-179 
180 
181 
182 
183 
184 
185 
186 
187-188 
189 
190 
191 
192 
193- 194 
195 - 196 
197 
198 
199 
200 
201 - 202 
203 
204 
205 
206 
207 
208 
209 - 210 
211 
212 
213 
214 


215 
216 
217 - 240 
241 
242 
243 - 244 
245 - 246 
247 - 248 
249 - 250 
251 - 254 
255 


Pointer to tape buffer ; scrolling 

Tape end addresses ; end of program 
Tape timing constants 

Pointer to start of tape buffer 

Tape timer ; bit count 

RS232 next bit to send 

Read character error ; next byte out 
Number of characters in current file name 
Current logical file number 

Current secondary address 

Current device number 

Pointer to current file name 

Write shift byte ; Read input character 
Number of blocks remaining to Read/Write 
Serial word buffer 

Tape motor interlock 

МО start addresses 

KERNAL setup pointer 

Current key pressed (see Appendix H) 
Keyboard buffer counter 

Flag : screen reverse - 1 is on, O is off 
Pointer to end-of-line for input 

Cursor log (row, column) 

Current key pressed 

Flag : cursor blink enable (0 is оп) 

Cursor blink delay 

Character under cursor 

Flag : cursor on/off 

Input from screen/keyboard 

Pointer to screen line on which cursor appears 
Position of cursor on line 

0 = direct cursor, else programmed 
Screen line length, 21, 43, 65, 87 

Current screen line number - To change cursor 
position, 201, 210, 211 and 214 must be changed 
ASCII value of last character printed 
Number of INSERTs outstanding 

Screen line link table 

Dummy screen line link 

Screen row marker 

Pointer to current location in colour memory 
Pointer to keyscan table 

Pointer to RS-232 receiver buffer start 
Pointer to RS-232 transmitter buffer start 
Free zero-page locations 

BASIC storage 
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256 - 266 
256-318 
256-511 
512-600 
601-610 
611-620 
621 - 630 
631 - 640 
641 - 642 
643 - 644 
645 
646 
647 
648 
649 


650 
651 
652 
653 


654 
655 - 656 
657 
658 
659 
660 
661 - 662 
663 
664 
665 - 666 
667 
668 
669 
670 
671-672 
673 
674 
675 
676 
677 
678 
679-767 
768 - 769 
770-771 


Float - ASCII work area 

Tape error log 

Processor stack area 

BASIC input buffer 

Logical file table for OPEN files 

Device number table for OPEN files 
Secondary address table 

Keyboard buffer 

Pointer to start of memory for operating system 
Pointer to end of memory for operating system 
Serial bus timeout flag 

Current colour code (for PRINTed character) 
Colour under cursor 

Screen memory page indicator 

Maximum length of keyboard buffer - must be 
less than 11 

Key autorepeat (0 = cursor controls, 255 = all) 
Pre-repeat delay 

Inter-repeat delay 

Keyboard flag for SHIFT, CTRL and C= keys. If 
SHIFT pressed, bit 0 is set, if CTRL, bit 1, if C=, bit 
2 

Last shift pattern 

Pointer for keyboard table set-up 

Shift mode (0 = enabled, 128 = disabled) 
Auto scroll down flag (0 = on, else off) 

RS-232 control register 

RS-232 command register 

Non-standard (bit time/2 — 100) 

RS-232 status register 

Number of bits to send 

Baud rate (full) bit time 

Pointer to RS-232 receiver buffer (end) 
Pointer to RS-232 receiver buffer (start) 
Pointer to RS-232 transmit buffer (start) 
Pointer to RS-232 transmit buffer (end) 

Holds ІНО during tape operations 

CIA 2 (NMI) Interrupt control 

CIA 1 Timer A control log 

CIA 1 Interrupt log 

CIA 1 Timer A enable flag 

Screen row marker 

PAL/NISC flag, 0 = NTSC, 1 = PAL 
UNUSED 

Error message link 

Basic warm start link 
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772-773 
774-775 
776-777 
778-779 
780 

781 

782 

783 
784 - 785 
788 - 789 
790 - 791 
792 - 793 
794 - 795 
796 - 797 
798 - 799 
800 - 801 
802 - 803 
804 - 805 
806 - 807 
808 - 809 
810-811 
812-813 
814-815 
816-817 
818-819 
828 - 1019 


1024 - 2039 
2040 - 2047 
2048 - 40959 
32768 - 40959 
40960 - 49151 
49152 - 53247 
53248 - 53294 
53248 - 57343 
54272 - 54300 
55296 - 56319 
56320 - 56335 
56576 - 56591 
57344 - 65535 
57344 - 65535 
65409 - 65525 
65478 

65481 

65484 

65487 


Tokenization routine link 

Print tokens link 

Start new BASIC code link 

Get arithmetic element link 
Temporary storage of A during SYS 
Temporary storage of X during SYS 
Temporary storage of Y during SYS 
Temporary storage of P during SYS 
USR function jump 

Hardware interrupt vector (EA31) 
Break (BRK) interrupt vector (ҒЕ66) 
NMI interrupt vector (FE47) 

OPEN vector (F34A) 

CLOSE vector (F291) 

Set input device vector (F20E) 

Set output device vector (F250) 
Restore І/О vector (F333) 

Input vector (F157) 

Output vector (F1CA) 

Test STOP-key vector (F6ED) 

GET vector (F13E) 

Close all files vector (F32F) 

User vector (FE66) 
Load-from-device vector (F4A5) 
Save to device vector (F5ED) 
Cassette buffer - useful for holding machine code 
when no files are being used 
Screen memory 

Sprite pointers 

Basic programs and variables 
ROM plug-in area 

ROM Basic 

Unused 

6566 video chip 

Character set 

6581 Sound chip 

Colour memory 

6526 Interface chip-1 

6526 Interface chip-2 

ROM operating system 

Unused 

Jump table including the following: 
Set Input channel 

Set Output channel 

Restore default I/O channels 
INPUT 
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<. 


Test STOP key 


PRINT 
GET 


65490 
65505 
65508 


таа 
при 


dm 


t 


=. 
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Appendix С 
Keyboard Graphics and how to get them. 


Symbol Keypress Symbol Keypress 
ЕЧ Ж Е 3 Еа х R 
H) х н ІН х a 
Ca к D Б) Ж ғ 
t3 жх с E Ж v 
ғы Ж B ш x + 
гл a T г Ж ү 
m х и ыы ox I 
ы х oa Li Ж P 
ІЗ ә a «x - 
ЙГ «x в Ui к н 
LS ж J a) Жж к 
UN х L Us Œ м 
сл x м ы o & 
Б] x 8 ел Ж Xx 
га < A e ax 7 
гч Ж s 
Li SHIFT L LJ SHIFT а 
[3 SHIFT 0 гл SHIFT Р 
ы SHIFT I ta SHIFT U 
Р] BHIFT К L3 BHIFT J 
e SHIFT и |. · ВНЈЕТ а 
EB SHIFT + 50 BHIFT V 
ы SHIFT М е BHIFT М 
Ф SHIFT 7 v SHIFT Б 
+ SHIFT X % SHIFT A 
гл SHIFT E es SHIFT D 
= SHIFT 8 ЕЗ SHIFT С 
= ӨНІҒТ Е c GHIFT Я 
| И SHIFT Т TJ BHIFT G 
13 BHIFT В ui BHIFT - 
UU BHIFT H (1 GHIFT Y 
Р BHIFT &£ 
т UP ARROW + LEFT ARROW 
чу РІ 


Ав well as these there are a set Of symbols 
used to represent control characters such as color 
controls and cursor controls. 


The syabels vary depending upon whether the 
coeputaer ie in upper case or lower case сода. 
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The syabols ares 


Upper case. 


Syabol Keypress 
Са CLR 
kS HOME 
ie Cursor down 
a Cursor up 
ш cursor right 
||| cursor left 
іш ctrl 1 
158 ctrl 2 
ctrl 3 
ь сегі 
m ctrì % 
a ctri Ф 
ш ctri 7 
ш ctr) a 
tea сегі 9 
ш ctrl о 
Lower case 
Буаво) Keypress 
HOME 
[| cursor down 
|-: | сегі 2 
$ ctri 4 
48 сегі 8 
ctrl 9 
5% Тһе 


Ж syabol is the special shift key 


located to the left of the left hand shift 
key 


182 


Appendix D 


Useful ROM routines 


The KERNAL is the operating system of the VIC 20. It contains many 
subroutines which can be of use to the machine language programmer. 
All of these can be accessed using a JSR instruction. Control will be 
returned to your program after the KERNAL subroutine has executed. In 
the brief descriptions of these subroutines below, the following 
information is presented. 


Name, Purpose 

Address : in hex 

Communication registers : registers used to pass information to and from 

the KERNAL subroutine. 

Preparatory routines : these routines must be called prior to the 

subroutine in question. 

Possible errors : if an error occurs, when the subroutine returns the carry 
flag will be set, and the error code will be in the 
accumulator. 

Stack : number of bytes of stack used by the routine. 

Registers used : a list of all registers used by the KERNAL routine. 


1) Name : ACPTR 
Purpose : Get data from serial bus 
Address : $FFA5 
Communication registers : A; data returned in accumulator 
Prep. routines : TALK, TKSA 
Possible errors : see READST 


Stack : 13 
Registers used : X, A 
2) Name : CHKIN 
Purpose : Open а channel for input 
Address : $FFC6 
Communication registers : X; load X with number of logical file to be 
used 


Prep routines : OPEN 

Possible errors : 3,5,6 

Stack : 0 

Registers used : A,X 

Name : CHKOUT 

Purpose : Open a channel for output 

Address : $FFC9 

Communication registers : X; load X with logical file number to be 
used 


3 


~ 


Prep. routines : OPEN 
Possible errors : 3,5,7 
Stack : 0 

Registers used : A,X 
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4) 


5) 


6 


ч” 


7) 


8 


— 


9) 


Name : CHRIN 

Purpose : Get a character from input channel 

Address : $F FCF 

Communication registers : А; data byte returned in A 

Prep. routines : OPEN, CHKIN (unless device is keyboard) 

Possible errors : see READST 

Stack : 0 

Registers used : A,X 

Name : CHROUT 

Purpose : Output a character 

Address : $FFD2 

Communication registers : A; load byte to be cutput in А 

Prep. routines : OPEN,CHKOUT (unless device is screen) 

Possible errors : see READST 

Stack : 0 

Registers used : À 

Name : CIOUT 

Purpose : Transmit a byte over the serial bus 

Address : $FFA8 

Communication registers : A; load byte to be output in A 

Prep. routines : LISTEN, (SECOND if device needs secondary 
address) 

Possible errors : see READST 

Stack : 0 

Registers used : A 

Name : CLALL 

Purpose : Close all files 

Address : $FFE7 

Communciation registers : none 

Prep. routines : none 

Possible errors : none 

Stack : 11 

Registers used : A,X 

Name : CLOSE 

Purpose : Close a logical file 

Address $FFC3 

Communication registers : A; load A with logical file number to be 

closed 

Prep. routines : none 

Possible errors : none 

Stack : 0 

Registers used : A,X 


Name : CLRCHIN 

Purpose : Clear !/O channels 
Address : $FFCC 
Communication registers : none 
Prep. routines : none 
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10 


11 


12 


13 


14 


"m 


w 


— 


) 


= 


Possible errors : none 

Stack :9 

Registers used : A, X 

Name : GETIN 

Purpose : Get a character from keyboard buffer 

Address : $FFE4 

Communication registers : A; character code returned in A 

Prep. routines : none 

Possible errors : none 

Stack : 0 

Registers used : A, X 

Name : IOBASE 

Purpose : Define МО memory page 

Address : $FFF3 

Communication registers : X, Y; respectively low and high address 
bytes of memory section where memory 
mapped МО devices are located аге 
returned in X, Y 

Prep. routines : none 

Possible errors : none 

Stack : Two registers used : X, Y 


Name : LISTEN 

Purpose : Command a device on the serial bus to receive data 

Address : $FFB1 

Communication registers : A; load A with number 4-1, 3 indicating 

device. 

Prep. routines : none 

Possible errors : see READST 

Stack : 0 

Registers used : A 

Name : LOAD 

Purpose : Load RAM from device, or verify 

Address : $FFD5 

Communication registers : A; set to О for load, 1 for verify. X, Y; low 

and high bytes of starting address of load 

Prep. routines : SETLFS, SETNAM 

Possible errors : 0,4,5,8,9 

Stack : 0 

Registers used : AX, Y 

Name : MEMBOT 

Purpose : Set or read the address of the bottom of RAM 

Address : $FF9C 

Communication registers : Carry flag; 1 to read, 0 to set bottom of 
memory. X, Y; low and high bytes of 
address. If carry is set, the address will 
be returned in X, Y. If carry clear, 
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address in X, Y will be transferred to 
pointer to bottom of RAM 
Prep. routines : none 
Possible errors : none 
Stack : 0 
Registers used : X, Y, P 
Name: MEMTOP 
оова : Set or read the address of top of RAM 
Address : $FF99 
Communication registers : Carry, X, Y; as for MEMBOT 
Prep. routines : none 
Possible errors : none 
Stack : 2 
Registers used : X, Y, Carry 


16) Name : OPEN 
Purpose : Open a logical file 
Address : $FFCO 
Communication registers : none 
Prep. routines : SETLFS, SETNAM 
Possible errors : 1,2,4,5,6 
Stack : 0 
Registers used : A, X, Y 


15 


~ 


17) Мате : PLOT 
Purpose : Set cursor location or read cursor location 
Address : $FFFO 
Communication registers : Carry : 1 for set cursor location 
0 for read cursor location 
X; column number (0-21) returned to or 
loaded from 
Y; row number (0-22) returned to or 
loaded from 


~ 


Prep. routines : none 
Possible errors : none 
Stack : 2 

Registers used : Carry, X, Y 


18) Name : RDTIM 

Purpose : Read system clock - 3 byte value 

Address : $FFDE 

Communication registers : A; most significant byte returned 
X; next mostsignificant byte returned 
Y; least significant byte returned 

Prep. routines : none 

Possible errors : none 

Stack:2 | 

Registers used : A, X, Y 
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19) Name : READST 


20) 


21 


~ 


22) 


23 


"— 


Purpose : read status word 

Address $FFB7 

Communication registers : A; error code returned in A. See 
discussion of ST in BASIC section for 
codes and meanings 

Prep. routines : none 

Possible errors : none 

Stack :2 

Registers used : A 

Name : RESTOR 

Purpose : Restore default system and interrupt vectors 

Address : $FF8A 

Communication registers : none 

Prep. routines : none 

Possible errors : none 

Stack : 2 

Registers used : A, X, Y 

Name : SAVE 

Purpose : Save memory to a device 

Address : $FFD8 

Communication registers : A; load with zero-page address. This 
address and the next byte contain the 
address of the start of memory to be 
saved. 
X, Y; low and high bytes of end address 
of memory to be saved. 

Prep. routines : SETLFS, SETNAM (SETNAM not needed if a 

nameless save to Datasette is desired ) 

Possible errors : 5,8,9 

Stack : 0 

Registers used : A, X, Y 

Name : SCNKEY 

Purpose : Scan the keyboard, put value in keyboard queue 

Address : $FF9F 

Communication registers : none 

Prep. routines : none 

Possible errors : none 

Stack : 0 

Registers used : A, X, Y 


Name : SCREEN 

Purpose : Return number of screen rows and columns 

Address : $FFED 

Communication registers : X; number of columns returned in X 
Y; number of rows returned in Y 

Prep. routines : none 

Possible errors : none 
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24 


25) 


~ 


26) 


27 


28 


~ 


~ 


Stack : 2 

Registers used : X, Y 

Name : SECOND 

Purpose : Send secondary address for LISTEN 

Address : $FF93 

Communication registers : A; load with secondary address to be 
sent 

Prep. routines : LISTEN 

Possible errors : see READST 

Stack : 0 

Registers used : A 


Name : SETLFS 

Purpose : Set up a logical file number, device and secondary 

addresses 

Address : $FFBA | 

Communication registers : A; load logical file number into A 
X; device number 
Y; command (secondary address) 

Prep. routines : none 

Possible errors : none 

Stack :2 

Registers used : A, X, Y 

Name : SETNAM 

Purpose : Set up file name 

Address : $FFBD 

Communication registers : A; load length of file name into A 
X, Y;low, high bytes of address of start of 
memory where file name is stored 

Prep. routines : none 

Possible errors : none 

Stack : 0 

Registers used : A, X, Y 

Name : SETTIM 

Purpose : Set the system clock - 3 byte value 

Address : $FFDB 

Communication registers : A; most significant byte 
X; next most significant byte 
Y; least significant byte 

Prep. routines : none 

Possible errors : none 

Stack : 2 

Registers used : A, X, Y 

Name : STOP 

Purpose : Check if stop key pressed 

Address : $FFE1 
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Communication registers : zero flag; set if STOP key pressed 

Prep. routines : none 

Possible errors : none 

Stack : 0 

Registers used : zero flag, A, X 

Name : TALK 

Purpose : Command a device on the serial bus to TALK 

Address : $FFB4 

Communication registers : A; load device number into A 

Prep. routines : none 

Possible errors : see READST 

Stack : 0 

Registers used : A 

Name : TKSA 

Purpose : send a secondary address to a device commanded to 
TALK 


Address : $FF96 
Communication registers : A; load secondary address into A 
Prep. routines : TALK 
Possible errors : see READST 
Stack : 0 
Registers used : A 
Name : UNLSN 
Purpose : Command all devices on the serial bus to stop receiving 
data 
Address : $FFAE 
Communication registers : none 
Prep. routines : none 
Possible errors : see READST 
Stack : 0 
Registers used : A 
Name : UNTLK 
Pupose : Send an UNTALK command to all devices on serial bus 
Address : $FFAB 
Communication registers : none 
Prep. routines : none 
Possible errors : see READST 
Stack : 0 
Registers used : A 
Name : VECTOR 
Purpose : Set or read system RAM vectors 
Address : $FF8D 
Communication registers : X, Y; address of list of system RAM 
vectors 
Carry flag; if sat, the RAM vectors are 
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read into the list pointed to by X, Y and 
if clear, the contents of the list pointed 


to by X, Y are read into the RAM 
vectors. 


Prep. routines : none 

Possible errors : none 

Stack : 2 

Registers used : Carry flag, X, Y 


Error Codes 

Value Meaning 
0 Routine terminated by STOP key 
1 Too many open files 
2 File already open 
3 File not open 
4 File not found 
5 Device not present 
6 File is not an input file 
7 File is not an output file 
8 File name is missing 
9 Illegal device number 


190 


Аррепаїх Е 


BASIC error messages 

BASIC's error messages aren't always illuminating. This list of 
messages and explanations may be helpful. 

BAD DATA: 

The program expected numeric data, but received string data (from an 
OPENed file) 

BAD SUBSCRIPT: 

The program tried to reference an element of an array whose subscript 
was outside the dimensions of the array. 

CAN'T CONTINUE: 

CONT doesn't work because (a) the program was never run, (b) it 
Stopped due to an error condition or (c) an attempt was made to edit the 
program. 

DEVICE NOT PRESENT: 

The relevant 1/О device isn't present. 

DIVISION BY ZERO: 

Not allowed. 

EXTRA IGNORED: 

Too many data items typed in response to an INPUT statement. Only the 
required numer of items were accepted. Doesn't stop a program. 

FILE ALREADY EXISTS: 

The name of the source file being copied with the COPY statement 
alread exists on the destination diskette. 

FILE NOT FOUND: 

On tape, this means that an END-OF-TAPE marker was found, so 
search stops. On disk no such file exists. 

FILE NOT OPEN: 

You tried an 1/О command on a file that hasn't been opened. 

FILE OPEN: 

You tried to open a file using a number assigned to a file already OPEN. 
FORMULA TOO COMPLEX: 

Either a string expression is too intricate, or an arithmetic expression is 
too complex. If it's a string, break it up into two parts. If it’s an arithmetic 
expression, try using parentheses. 

ILLEGAL DIRECT: 

The command attempted in direct mode can only be used in program 
mode 

ILLEGAL QUANTITY: 

А number used as an argument is out of range. e.g. POKEing a value 
greater than 255. 

LOAD: 

Too many errors ( » 31) were found on a tape LOAD 
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NEXT WITHOUT FOR: 

Either you've put in too many NEXT statements, forgotten a FOR 
statement or branched past a FOR statement. 

NOT INPUT FILE: 

Anattempthas been made to read from a file designated as output only. 
NOT OUTPUT FILE: 

An attempt has been made to write to a file designated as input only. 
OUT OF DATA: 

A READ statement has run out of data. 

OUT OF MEMORY: 

No more RAM left for program or variables. Also caused by too many 
nested FOR loops and/or GOSUBs. In this case you may have lots of 
memory but no stack left. You may also have inadvertently changed the 
top-of-memory pointer. 

OVERFLOW: 

The result of a calculation is greater than 1.70141884E +38. 

REDIM'D ARRAY: 

An array name appears in more than one DIM statement, or has been 
both implicitly and explicitly DiMensioned. 

REDO FROM START: 

An INPUT statement received the wrong type of data. Doesn't stop the 
program, just continues prompting until the correct type of data is input. 
RETURN WITHOUT GOSUB: 

A RETURN for which there is no corresponding GOSUB. Usually caused 
by dropping into the subroutine inadvertently. 

STRING TOO LONG: 

Strings can be a maximum of 255 characters long. 

SYNTAX: 

BASIC doesn't recognise the statement. 

TYPE MISMATCH: 

Number used in place of string, or vice-versa. 

UNDEF'D FUNCTION: 

A user defined function was called but has not yet been defined, with a 
DEF FN statement 

UNDEF'D STATEMENT: 

An attempt has been made to go to a non-existent line number. 
VERIFY: 

The program on tape or disk being VERIFYd does not match the program 
in memory. 


192 


66! 


£9 л № € 16 (ысы si Nuni3y 
29 3NOH 9% - 05 / vl . 
19 — ср : 6c ' €l d 
09 0 vv У 8c N сі | 
6S 8 ЄР H 42 A LE A 
86 9 о? а 9c X OL Н 
46 ? Lv 5 Gc euou 6 M 
96 с Ot euou vc 4015 8 3 
55 3 65 Т ez — €yusHO 4 лаа 
vS + ве әиои 22 9 3 
£S С) Ze • 12 1 © + 
29 О 96 W 02 г ? 6 
16 n 56 8 61 ә £ 4 
06 1 РЕ 9 81 а с S 
6? 3 ce 7 41 v | > 
8p О 06 394$ 91 euou 0 | 
этел Key этел Хәл әпјед Жә) әпјед Key 


"релој $! әпүел seyBiy eui pesseidep si Лә euo иеці 

әлош j| 'pesseJdep Aay jueJuno eui jo enje^ pepoo е 591016 /6| ЧОЦЕ201 
pessaJd Aay 3цәмп2 

з xipueddy 


INDEX 


Abbreviating BASIC ........ 42, 43, 44 
Absolute addressing ............. 106 
Ассити!аог.................... 104 
Appending programs ............. 44 
Аттаубі::- іы азалы CES 10,43 
АСС ааннара 6 
Attack сс засы ea eer eee 52,72 
Анепџа д ...................... 58 
Autostart ....................... 119 
BAM чулуу ы Мр ea ies 154 
Baseaddress .............. 107, 108 
BASIC interpreter ................. 2 
BASIC 5їогаде................... 45 
BASIC syntax .................... 17 
Binary digit ................... 6, 102 
Binary number system ........ 14, 102 
Bit mapped screen ........... 91, 140 
BIS еа DU EUER 15 
Block allocate ................... 157 
Block ево а. 158 
Block read ..................... 156 
Block write ..................... 157 
Boolean operators ................ 13 
Buffer ...... 45, 47, 119, 155, 156, 158 
Buffer pointer ................... 158 
Byte. за ни аи e ак 6 
Character colour ................. 80 
Character memory ............... 79 
Caracter table ................... 82 
Collision detection ............. 91, 98 
Colour control keys ............... 80 
Colour Memory ............ 79, 80, 82 
Command number ............... 30 
Concatenation ................. 8, 12 
Control structure .................. 2 
Conversion 
hex to Ыпагу.................. 103 
hex to decimal ................ 103 
деслоћех .................... 103 
дес ќо біпагу.................. 103 
Datasette ...................... 152 
Data structure ..................... 6 
Debugging ....................... 5 
Decay сз: cess авина на s 52,72 
Decimal number system ........... 14 
Default ................ 11, 19, 80, 99 
DEVICE NOT PRESENT .......... 36 
Device питбег................... 30 
Diskette directory ............... 154 
Disk user commands ............ 160 
Drive number ................... 155 


194 


ЕСПО ce аскан E ваЗ 68 
Editor/Assembler ............... 125 
Епуеіоре ........................ 52 
Exclusive OR XOR ............... 41 
Expanding sprites ................ 93 
Extended background colour ....... 90 
EXTRA IGNORED ............... 25 
Раве сасна на: 2 
File manipulation ................ 154 
Filters ааа re 56, 73, 74, 78 
FIGS p EE 105 
Floating point variables ............. 9 
Floppy disk drive ................ 152 
Formatting Diskettes............. 153 
РОЯ — МЕХТ ..................... 2 
Function keys ................... 128 
Саю Dit. а E ERE 71 
GOSUB..... ie een 4, 43 
GOTO оаа анаан МУ 4 
Graphics memory ................ 79 
Graphics printer ................. 161 


Hexadecimal number system . .14, 102 


Hires graphics ................... 86 
IE THEN ......................... 2 
ILLEGAL QUANTITY ............. 17 
Immediate addressing ........... 106 
Immediate mode .................. 1 
Implicit addressing .............. 106 
Indexed addressing ............. 107 
Indexed indirect addressing ....... 108 
Indirect indexed addressing ....... 108 
Indirect pointers ................. 108 
Initialisation .................... 134 
Instruction set (6510) ............ 109 
Integer variable .................. 10 
Interrupt request ............ 127, 146 
1/0 деуісе ...................... 119 
ПО Воп аала аах 105 
JOVSIICK -. o door er nus 163 
Ката! а аватар ака Yn EXE 133 
Keyboard ...................... 163 
Keyword ........................ 45 
Label references ................ 125 
Loop variable ..................... 3 
Lores graphics ................... 79 
Кеннет eheu а RD: 104 
Linking registers ................. 67 


MASKS) д.а ry ERROR 16, 88 
Memory бапк................... 118 
Memory configuration ............ 120 
Memory execute ................ 160 
Memory management signals . .... 120 
Memory map ................... 118 
Memory read ................... 159 
Memory write ................... 159 
Microprocessor ................. 101 
Мпетопс5..................... 109 
БАМОМ ........................ 127 
Monitor ........................ 125 
Modulation ...................... 68 
Multicolour ...................... 89 
Multicolour bit map mode .......... 91 
Multicolour sprites ................ 93 
Multiple statements ............... 42 
Nesting ....................... 3, 32 
Note values ..................... 75 
Nybbles о не аи Ys 90 
Object code .................... 125 
ON GOTO/GOSUB................ 5 
Operands ....................... 11 
Operating system ............... 133 
Operators ....................... 11 
ОЏТОЕОАТА................... 25 
OUT OF MEMORY ................ 5 
OVERFLOW ERROR .............. 9 
e cari MM ce 43 
Paddles ..................... 74,163 
PROD су се а t bru X EUN 51 
m Б у узлы er eee 86, 91 
Ропетепію ...................... 69 
Processor registers .............. 104 
Processor status register ......... 104 
Program counter ................ 105 
Program lines ..................... 1 
Program mode .................... 1 
Pseudo random .................. 35 
НАМ: вала ва молили EA 119 
Random access ................. 156 
Raster interrupt .............. 91, 145 
Raster гедег.................. 146 
REDO FROM START ........... 8, 25 
Registers ................. 52, 53, 54 
Relative addressing ............. 107 
Release p 52, 72 
Release signal ................... 52 
Resonance ...................... 59 
Ring mod bit.................. 71,73 
HOM. order eat estia 119 
ROM cartridge .................. 119 


195 


Scientific notation ................. 9 
Screen codes .................... 81 
Screen memory .................. 79 
Sectors ........................ 153 
Sequential access ............... 156 
Sequential execution............... 2 
Sound chip registers .............. 70 
Ѕоипа ейесіѕ .................... 67 
Source program ................. 125 

КОКК КУК ЛС Аы ТЫ 43 
sp. pm сыза арамы А 91 
Sprite collisions ................. 147 
Sprite collision register ............ 98 
Зртесојоиг..................... 93 
Sprite movement ................. 94 
Sprite pointer .................... 91 
Sprite priority .................... 96 
Sprite priority register ............. 97 
іле secet deos usce ett 3,5 
Stack pointer ................... 104 
String variable .................... 8 
Sustain ...................... 52,72 
Зупеби...................... 71,72 
TAB а ен аб титана 43 
Testbit ......................... 71 
TIMING а С атыз лана арта аі 56 
ir сысы ae Пака 153 
во 2 
Utility instructions ............... 156 
Variable ...................... 5,42 
Vectors ........... 107, 119, 127, 128 
У (Ота Ол os cete tete и ку aei un 68 
VIC chip addresses ............... 86 
VIC chip registers ............... 100 
Video Бапк.................. 92, 140 
Di. mE 54,55 
М/амеюгт.................... 51, 72 
Write protect ............... 152, 154 
X and Y index registers........... 104, 
Zero page addressing ............ 106 


NOTES 


196 


Алс. 


NOTES 


197 


_ NOTES 


Laer 


198 


